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This publication contains the specifications of two 
separate but similar packages of disk-file organization 
routines. The two packages and the system configura- 
tions on which they are used are: 

ibm 1401-1460 (1311 and 1301) Disk- File Organiza- 
tion Routines 

ibm 1440 (1311 and 1301) Disk-File Organization 
Routines 

The following subjects are discussed in this publica- 
tion: 

• An introductory section on general considerations of disk-file 
organization. 

• Descriptions of each of the 13 individual object programs. 

• Allowable sizes and formats of input-output files. 

• Program exits and labels useful to user subroutines. 

• The parameter cards used to generate the object programs 
and the rdlin cards used for area definition at object time. 

• Suggested retrieval routines (block diagrams). 

• A complete example of a random file and the programs gener- 
ated to load and maintain it. 
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Preface 


This publication describes two separate but similar 
packages of disk-file organization routines. Each pack- 
age consists of a prephase and a set of library routines 
from which two complete sets of object programs can 
be generated. One of the two sets of object programs 
is designed to load and maintain a random file using 
the chaining method, whereby a record is loaded into 
a disk location determined by the control data of the 
record. The other set of object programs loads and 
maintains a file of records in sequential order. In this 
case, a sequenced file is loaded into consecutive disk 
locations. A sequence link field is used to accommodate 
additions to and deletions from the file. Also, an index 
is built to facilitate random retrieval of records in the 
sequential file. 

These file-organization routines are supplied by ebm 
in Autocoder library format. From these library rou- 
tines, the macro generator portion of Autocoder gen- 
erates object programs to be used in organizing and 
maintaining disk files. The object programs are gen- 
erated in accordance with a series of parameter cards 
punched by the user and are tailored, by these param- 
eters, to the user’s particular application. 



Disk File Organization Routines Specifications 
IBM 1401, 1440, 1460 (1311 and 1301) 


Machine Requirements 

IBM 1401-1460 Disk File Organization Routines 

To Generate Object Programs. These routines are en- 
tered in the library portion of the ibm 1401-1440- 
1460 Disk Autocoder. This Autocoder can be op- 
erated from either 1311 or 1301 disk storage. The 
machine requirements to generate file-organization 
object programs are the same as for any 1401 or 
1460 disk Autocoder run. See the publication Auto- 
coder (on Disk) Program: Specifications and Operat- 
ing Procedures, C24-3259. 

To Run Object Programs. 

ibm 1401 Processing Unit with 4,000 core-storage 
positions or, 

ibm 1441 Processing Unit with 8,000 core-storage 
positions. 

The high-low-equal compare feature is required. 
Additional core storage can be utilized for longer rec- 
ord and block lengths. The advanced-programming 
(1401) or indexing-and-store-addr ess-register (1460) 
feature is not required but, if available, is utilized for 
faster, more efficient programming. 

ibm 1402 Card Read Punch. 
ibm 1403 Printer, Model 1, 2, or 3. If the console 
printer is available, the 1403 is used only for the 
optional audit trail printouts. 
ibm 1407 Console Inquiry Station or, 
ibm 1447 Console (without the buffer feature). 
The console printer is not required. If available, 
however, it is used to print all status and error mes- 
sages, leaving the ibm 1403 Printer for only the 
(optional) audit trail printouts. A 1447 with the 
buffer feature cannot be used. 

ibm 1301 Disk Storage, Model 11, 12, 21, or 22, or 
ibm 1311 Disk Storage Drive, Model 1 or 2. These 
programs can be generated in either 1311 or 1301 
disk storage for systems with either or both 1311 or 
1301 disk storage. The 1311 direct-seek feature is 
not required but is utilized if available. 

ibm 729 or 7330 Magnetic Tape Unit. Required 
only if tape input or output is requested. 


IBM 1440 Disk File Organization Routines 

To Generate Object Programs. These routines are en- 
tered in the library portion of the ibm 1401-1440- 
1460 Disk Autocoder. This Autocoder can be op- 
erated from either 1311 or 1301 disk storage. The 
machine requirements to generate file-organization 
object programs are the same as for any 1440 disk 
Autocoder run. See the publication Autocoder (on 
disk) Program Specifications and Operating Proce- 
dures, C24-3259. 

To Run Object Programs. 

ibm 1441 Processing Unit. When operating on ibm 
1311 Disk Storage Drives, 4,000 core-storage posi- 
tions are required. When operating on ibm 1301 
Disk Storage, 8,000 positions are required. Addi- 
tional core storage can be utilized for longer record 
and block lengths. The indexing-and-store-address- 
register feature is not required but is utilized if 
available. 

ibm Card Read Punch, Model 1 or 2, or 
ibm 1442 Card Reader, Model 4. The selective- 
stacker feature (Model 1 only) is not required but 
can be used to separate-out mispunched cards when 
punching. 

ibm 1444 Card Punch, Model 1. Required only if 
punched output is requested on a system with only 
a Model 4 of the 1442. 

ibm 1443 Printer, Model 1 or 2. If the console 
printer is available, the 1443 is used only for the 
optional audit trail printouts. 

ibm 1447 Console (without the buffer feature). 
The console printer is not required. If available, 
however, it is used to print all status and error mes- 
sages, leaving the ebm 1443 Printer for only the 
(optional) audit trail printouts. A 1447 with the 
buffer feature cannot be used. 
ebm 1301 Disk Storage, Model 11, 12, 21, or 22, or 
ibm 1311 Disk Storage Drive, Model 1 or 2. These 
programs can be generated in either 1311 or 1301 
disk storage for systems with either or both 1311 
or 1301 disk storage. The 1311 direct-seek feature is 
not required but is utilized if available. 

ibm 7335 Magnetic Tape Unit. Required only if 
tape input or output is requested. 
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General Considerations of 
Disk-File Organization 


There are many advantages to random-access storage 
in a data processing system. The ibm 1311 Disk Stor- 
age Drive and the ibm 1301 Disk Storage have greatly 
increased these advantages. The flexibility of these 
units allows several kinds of processing within the 
same system. The advantages offered by one kind of 
processing are often quite different from those offered 
by another. For example, in a random-processing ap- 
plication, the advantages center around the ability to 
process only those records that have current trans- 
actions, rather than to process all of a file. In a second 
case, the advantage may be the ability to process one 
or more sequential files against a single sequenced 
input. 

File organization is the key to effective use of disk 
storage. The objective of disk-file organization is the 
systematic storing of information in disk storage in 
such a manner that records can be retrieved in the 
quickest way possible, while still maintaining the over- 
all processing objectives of the system. 

The method of organization best suited to a par- 
ticular file of disk records depends upon many factors. 
These factors must be analyzed for each file in any one 
particular application. Often, more than one organiza- 
tion scheme can be used on the same file. In one 
application, records could be processed purely at ran- 
dom; in another, the same records could be processed 
in sequence by various control fields. For example, 
records within a file might be processed at random 


during an updating run and sequentially within cer- 
tain groups, such as branch office or due date, when 
producing reports or billing. A file such as this would 
be analyzed to determine whether it should be organ- 
ized: 

1. Purely randomly, thus keeping process time at a 
minimum during one run but destroying the ad- 
vantage of the sequential nature of the other. 

2. Sequentially, thus minimizing the time required to 
produce reports but increasing updating time. 

3. Randomly for updating and then sorted into se- 
quence for reports. 

The decision would depend on the nature of the file. 
Questions such as the following might be asked: 

1. Can transactions be batched and sorted before 
processing, or must they be processed as they occur? 

2. Is the activity distributed throughout the file in 
such a manner as to warrant passing the entire file 
when updating? 

3. Would the processing time saved by sorting warrant 
the time and effort required? 

Questions of this kind must be asked of each file in 
an installation. In choosing organization methods, the 
over-all processing objectives of the system must be 
kept in mind at all times. 


6 File Org. Specs. 



Random Files 


Direct Addressing 

The simplest method of file organization is that in 
which a unique disk address is obtained from the con- 
trol data of each record. This is referred to as the direct 
addressing method. Consider this case as an example: 

A particular file consists of 10,000 records, each 100 
characters long. No records are ever added to or de- 
leted from the file. Each record has a unique 6-digit 
control field ranging from 000000 to 009999, inclusive. 
Further, this file is always processed in one of two 
ways: 

1. Either purely randomly, with no predeterminable 

sequence, or 

2. Purely sequentially by the 6-digit control fields. 

In this hypothetical case there is one logical method 
of disk-storage organization. Record 000000 is stored in 
sector 000000; record 000001 in sector 000001; and so 
on, to record 009999 which is stored in sector 009999. 

No elaborate file-organization program could pos- 
sibly improve the organization of this file. When proc- 
essing randomly, any record can be found with a 
single seek. When it is possible to process sequentially, 
only one seek is needed per cylinder. Processing time 
is thus at an absolute minimum. Also, the file area is 
packed 100% . No disk-storage space is lost. However, 
this was given as the optimum case, and it rarely oc- 
curs in actual practice. 

In practice, the control data (item number, account 
number, etc.) of a file of records can seldom be used 
directly as disk addresses. Even when in the proper 
form, they do not always fall within the range of ad- 
dresses desired. However, it may still be possible to 
use direct addressing. For example, suppose the rec- 
ords in the previously described file were 200 charac- 
ters long. Thus each record would require two sectors. 
Unique disk addresses could be assigned to these rec- 
ords by multiplying the control data of each record by 
2 and then adding a constant to arrive at addresses 
within the desired portion of the disk pack. 

If these records were 25 characters long, and it were 
desired to use single-sector blocks with four records 
per block, each control field could be divided by four. 
The remainder of the division could be used to indi- 
cate the individual record position within the block. 

If the file has no control fields that can be used di- 
rectly as disk addresses, it is sometimes possible to 
pre-assign addresses. For example, the item number 


4709GPX could become 4709GPX-023456, where 023- 
456 is the disk address of the record. 


Indirect Addressing 

Where none of the preceding methods are possible, it 
may be desirable to use a conversion routine to operate 
on the existing control data to produce disk addresses 
within the desired range. If the conversion routine 
used on a file produces a unique disk address for each 
record, direct addressing can be used. However, in 
most cases, using a conversion routine results in assign- 
ing some disk addresses to more than one record. 
Such duplicate disk addresses are called synonyms. 

There are several ways of organizing files with syno- 
nyms. The method that has been determined most effi- 
cient in the majority of cases is that called the chaining 
method. This is the method used by the random disk- 
file organization routines described in this bulletin. 

The objective sought by a conversion routine is to 
convert the control data of the records in a file to a 
randomly distributed series of disk addresses within a 
desired range, and to do this with a minimum number 
of synonyms. It is not possible to specify any one 
method of making this conversion. Each situation must 
be studied individually to determine the best method. 

Chaining 

The file organization technique used with a file employ- 
ing indirect addressing must be able to accommodate 
the synonyms or duplicate addresses produced. The 
term chaining is applied to a technique that has been 
found to be most efficient in a majority of cases. Chain- 
ing is particularly suited for use in 1311 and 1301 disk 
storage because successive links of a chain of syno- 
nyms can be read without reseeking. 

As each record is read in to be loaded in disk 
storage, its control data is converted to a disk address. 
These converted addresses are called home addresses. 
Because only one record can be stored in each location, 
the first synonym (home record) is placed in the origi- 
nal address developed (home address). The additional 
record or records (non-homes) are stored in overflow 
locations. The address of the first overflow location is 
stored in the home-address location. The address of 
the second overflow location is stored in the first 
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Figure 1. Disk-Storage Chaining 


overflow location, etc. Chaining requires that, in the 
home address and all overflow locations, space be re- 
served for the address of the next location or link in 
the chain (Figure 1). 

A chained file is normally loaded in two passes. Dur- 
ing the first pass, only those records that can be placed 
in home locations are loaded. The second pass places 
all of the remaining records in overflow locations. 
Each overflow record is placed in an available loca- 
tion as close as possible to the previous link in the 
chain. 

Retrieval of a record is accomplished by converting 
the control data to the home address. The record in 
the home-address location is read into core storage, 
and its control data is compared to that of the record 
being sought. If the control fields are not equal, the 
address of the first overflow record is extracted from 
the home record and another read command is issued 
using this address. The process is repeated until the 
desired record is found. 

The time required to retrieve a particular record 
depends upon its position in a chain. All home records 
can be retrieved with a single seek and read. Subse- 
quent links of a chain may require additional reads 
and, possibly, additional seeks. 

File Packing 

The average number of reads required to retrieve a 
record from a chained file depends upon the number 
of synonyms developed by the conversion routine. The 
number of synonyms produced by a randomizing con- 
version routine can be reduced by assigning more disk- 
storage space than actually required by the file. The 
percentage of the file area actually used for records is 


called the packing factor. For example, 11,000 disk lo- 
cations might be used to store 10,000 records. Thus, 
the file would be said to be packed approximately 
90%. 

With a chained file, the average time required to 
retrieve records diminishes as the packing factor de- 
creases. However, it is impossible to state any given 
packing factor as the best for all chained files. The 
packing of an efficiently organized file can vary from 
65% to 95%. The time required to retrieve a record is 
not the only factor by which the efficiency of a file is 
measured. For example, a file might be packed close 
to 100% if by so doing the entire file can be kept 
within one disk pack. On the other hand, a file might 
be packed very loosely if it is desired to keep only one 
file or one group of related files on a single pack. An- 
other point to consider is anticipated growth. Room 
must be left in a file area to accommodate records 
added at a later date. 

Blocking Records in a Chained File 

Records can be blocked easily in 1311 and 1301 disk 
storage. Because a single 100-character sector is the 
smallest unit of storage that can be read or written, 
the block length must be some multiple of 100 charac- 
ters. The block length is limited only by the amount of 
core storage available for reading and writing the disk. 

One reason for blocking records in a chained file is 
to save storage space. For example, four 125-character 
disk records can be stored in one 5-sector block with 
no wasted space. Another reason is that the average 
number of reads required to locate a record can usu- 
ally be reduced by increasing the blocking factor 
(number of records per block). The greater the block- 
ing factor, the greater the chance that overflow records 
will be in the same block as the home record. When 
they are, no additional read is required. It should be 
remembered, however, that the longer the block length, 
the longer the time required to accomplish a single 
read operation. 

Frequency Loading 

The total time required to process a chained file can 
often be reduced by loading the most active records 
first, thus assuring their being placed in a home loca- 
tion or a prime position in a chain. It has been found 
that in many applications approximately 80% of the 
transactions apply to only 20% of the file. For exam- 
ple, out of every 100 transactions, 80 will be for the 
20% high-activity items. 

If no activity count is available when a file is initially 
loaded, it may be worthwhile to set up a field in each 
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record to accumulate such a count. At a later date, 
the file can be sorted on this count and reloaded. 

Additions and Deletions 

Continual additions to, and deletions from, a file affect 
the efficiency of any organization scheme. The effect 
on a chained file, however, is comparatively slight. 
Thus, chaining is particularly suited to files with a 
very large turnover. 


Sequential Files 

Two hundred sectors of 1311 disk storage or 800 sec- 
tors of 1301 disk storage can be read at a single 
access-arm setting. Because of this ability, many disk 
applications can be made more efficient by organizing 
files in a sequential order rather than in random 
order. The goal in a random file is to come as close 
as possible to an average of one seek and one read 
per record. The goal in a sequential file is one seek 
per cylinder and one read per block. 

When a sequential file is being loaded, the records 
are previously sorted into sequence by control field. 
They are then read into the system and stored in con- 
secutive disk locations. To process the file, a program 
requires only the upper and lower limits of the file 
area. It begins with the first record and processes 
each record in sequence. 

Additions and Deletions 

Additions to and deletions from a sequential file can be 
handled in several ways. In some cases it is possible to 
batch additions and deletions and merge them into the 
file during a regular updating run. Another method, 
the one used in the ibm control sequential file-organi- 
zation routines, uses a sequence link. In this case, a 
field of blanks is appended to the end of each record 
as it is loaded into disk storage. Records to be added 
to the file are written into a separate area of disk stor- 
age. The address of the added record is written in the 
sequence-link field of the record that sequentially pre- 
cedes the added record. Similarly, a record can be de- 
leted and the sequence reestablished by placing the 
address of the following record in the sequence-link 
field of the preceding record. When the file is proc- 
essed, a program always checks the sequence link of 
a record. If it is blank, it reads the next consecutive 
disk location. If it contains an address, it seeks and 
reads that address. 

Additions and deletions quickly impair the efficiency 
of a sequential file. It may, therefore, be necessary to 
resequence the file often. 


Blocking Records in a Sequential File 

Records in a sequential file should be blocked in such 
a way as to reduce input/output time to a minimum. 
Because there need be but one seek per cylinder, the 
objective is to reduce rotational delay time. 

As a general rule, the longer the block length, the 
shorter the read, write, write-check time per record. 
However, in some cases, the time required to process 
or update records is such that a rotation can be gained 
by using a shorter block length. 

Random Processing of a Sequential File 

In some applications it is desirable to process sequen- 
tial files in a random order. Because there is no neces- 
sary relationship between the control data of a record 
in a sequential file and the disk address at which it is 
located, some other kind of addressing technique must 
be used. 

The control sequential routines described in this 
bulletin use a distribution index for this purpose. The 
distribution index is a table set up during the initial 
loading of the file. It consists of the control data from 
certain records in the file and the disk addresses of 
those records. An entry can be made to the index once 
for each cylinder or once for any specified number of 
records. The distribution index is written into disk 
storage in an area specified by the user. When it is de- 
sired to locate a given record, -the index is brought to 
core storage and searched. The index does not neces- 
sarily give the exact disk address of the desired record, 
but it does establish the range within which it is lo- 
cated. For example, if an entry were made after every 
twentieth record of a file of 100-character records, the 
index would tell the track on which the record was 
located. The track could be easily searched or scanned 
for the desired record. 

The average number of seeks and reads required to 
locate a single record in a sequential file depends upon: 

1. The size of the file and the number of additions 

records. 

2. The size of the distribution index. 

3. The frequency of the entries in the index. 

The size of the distribution index depends on the 
frequency of entries and the length of the control fields 
in the records. Thus at least one seek and possibly a 
number of reads are required to locate the. proper 
portion of the index. In some cases it is practical to 
set up a short table in core storage to index the distri- 
bution index. In this way the table in core storage 
indicates the desired sector from the distribution index. 

Having found the range within which the desired 
record is located, another seek and additional reads are 
performed to locate the record. 
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Random Programs 


This section describes eight programs used to load 
and maintain a random file. Each program is generated 
separately and is available from both of the file-organi- 
zation packages. The file on which these programs are 
to operate can consist of both master and trailer rec- 
ords. Master records are the basic data records in a file. 
Trailer records are considered to be extensions of mas- 
ter records. A master record can have a number of 
trailer records, but there can be no trailers without a 
master. 

Master and trailer records are loaded separately 
and into different areas of disk storage. The master 
and trailer areas must both be in the same type of disk 
storage unit. For example, if the master area is in 
1301 storage, the trailer area must be also. However, 
input and output can be on different types of disk 
units. As each trailer is loaded, its disk address is 
linked to the master. In effect, the linked master and 
trailer records can be considered a variable-length disk 
record. Certain processing runs may consider only the 
master records; others, only the trailers. However, 
when the entire block of information is needed, a 
program can seek the master record and then follow 
a chain of any number of trailer records associated 
with that master. 
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Figure 2. Work Tracks Preceding Random Master File 


The random object programs that can be generated 


are: 


1. PASS1 

Loads home master records. 

2. PASS2 

Loads non-home master records. 

3. RNADD 

Adds master records to an organized file. 

4. TRADD 

Loads or adds trailer records. 

5. RNDEL1 

Deletes or tags master records and associated 
trailer records. 

6. RNDEL2 

Deletes previously tagged records. 

7. TRDEL 

Deletes trailer records. 

8. RNUNLD 

Unloads a random file for reorganization. 

A complete 

set of random programs generated for 

a given file 

normally includes each of the above- 

mentioned programs and at least one additional ver- 

sion of: 


1. PASS1 

The first performs the initial load. 

The second reorganizes files unloaded by 


RNUNLD. 

2. PASS2 

Same purpose as the two versions of PASS1. 

3. RNDEL1 

The first deletes records. 
The second tags records. 

4. RNUNLD 

The first unloads master records for reorgani- 
zation. 

The second unloads trailer records for reor- 
ganization. 


Note: Additional versions of this program are 
often generated to produce stripped files to be 


processed by other programs. 


Work Tracks 

An area immediately preceding the master-file area 
must be reserved for these programs to use as work- 
ing storage. The area required may be from one to 
five tracks, depending on the amount of core storage 
in the system, the kind of disk unit being used, and 
whether disk or tape labels are used. 

Figure 2 shows the work area for both 1311 and 
1301 master files. 

1. The first one (1311) or two (1301) tracks preceding 
the master file area are used to store the availability 
table. This table stays on the track from. one run to 
the next and must not be destroyed. 

2. The next track (second on 1311 or third on 1301) 
preceding the master area is always required if the 
file is in 1301 disk storage. If the file is in 1311 disk 
storage, this track is used only in a 4K system. It is 
used for temporary storage of program overlays. 
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Nothing is retained on the track from one run to 
the next; therefore, it can be used as a work area 
by other programs. 

3. The third and fourth (1311) or fourth and fifth 
(1301) tracks preceding the master area are used to 
store disk-label checking routines and tape I/O 
routines. If the programs neither process disk labels 
nor process tape input-output, these tracks need not 
be reserved. Nothing is retained on these tracks 
from one run to the next; therefore, they can be 
used as a work area by other programs. 

(PASS1) Pass>l Random Load Program 

PASSl reads the entire input master file and loads all 
of those records whose control data is, or converts to, 
the address of an unused disk location. Such records 
are called home records. Records with control data 
that converts to disk locations that are already oc- 
cupied are handled as non-home records; marked or 
set aside to be loaded during PASS2. If there are no 
duplicate disk addresses in the file, there are no non- 
home records. In this case, PASSl is used to load all 
records in the file including any to be added during 
subsequent runs. Therefore, PASS2 and RNADD are 
not required. 

Two PASSl object programs are normally generated 
for a given file. The first is to perform the initial load 
of the file. The second is used to reorganize files un- 
loaded by the random unload program, RNUNLD. 

Input Records 

Input to PASSl can be from cards, tape, or disk stor- 
age. The formats allowed are discussed under Input/ 
Output Files. The file should be sorted on activity, if 
such a count is available (see Frequency Loading). 


Output Records 

The format of the output master records depends on 
the number and length of the appended fields. When 
a master record is loaded into disk storage, the rou- 
tines append the following fields : 

Overflow Address Field: This field is appended to the 
end of each master record. If the master file is un- 
blocked, this is a 6-digit field. If the file is blocked, 
this is a 7-digit field. If there are no duplicate disk 
addresses, a single position is appended. This posi- 
tion contains an availability indicator. 

Trailer Address Field: If trailer records are used, each 
master record has a 7-digit field appended to the 
front of the record. After trailer records are loaded, 
this field contains the address of the first trailer 
record (if any) associated with the master record. 

Figure 3 illustrates four kinds of disk-storage 
master records showing the user’s data records plus 
the combinations of appended locations as required 
by the configuration of the file. 

Conversion Routine 

The user must supply a conversion routine to be as- 
sembled along with the following random programs: 


PASSl 

— except when reloading a file unloaded by a 
RNUNLD program generated with the oper- 
and CONADD in the typernunld card. 

PASS2 

— only when the nonhomes card has the oper- 
and PUNCHZONE. 

RNADD 

— always 

TRADD 

— always 

RNDEL1 

— always 

RNDEL2 

— except when there are no duplicate addresses. 

TRDEL 

— always 

RNUNLD 

— only when the typernunld card has the 
operand CONADD. 



Figure 3. Four Kinds of Disk Storage Master Records 
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The object programs extract the control data of a rec- 
ord and place it in a field labeled CONTD. The source 
statements that define this field are taken from the file- 
organization library routines. The field is the exact 
length specified for the control data. If the control 
data rs broken into subfields within the records, the 
subfields are arranged (from the left* to right) in the 
order specified in the mastcontrl card. The field has 
a word mark in the high-order (left-most) position. 
This word mark must not be cleared by the user’s rou- 
tine, and no other word marks can be in the field when 
control is returned to the main program. 

After placing the control data in the field labeled 
CONTD, the program branches to the first instruction 
of the user’s conversion routine. This first instruction 
must be labeled CONROU. If index registers are used, 
their contents must be saved and restored before re- 
turning control to the main program. The conversion 
routine must take the control data from the field la- 
beled CONTD, develop a valid address (see Converted 
Record Addresses ), and place that address in a field 
labeled CONV1. The source statements that define this 
field are also taken from the file-organization library 
routines. If the file is unblocked, this is a 6-digit field; 
if blocked, a 7-digit field. It has a word mark in the 
high-order (left-most) position. 

The last instruction of the conversion routine must 
be labeled RETU1. It returns control to the program 
by branching to START3. 

A routine must be provided even if disk addresses 
are extracted directly from the records. In this case the 
routine simply moves the address to CON VI and then 
branches to START3. 

Note. If a file extends from one disk pack to another, it is 
up to the conversion routine to avoid those addresses that would 
cause a block to overflow from one pack to another. See Cylin- 
der Overflow for special considerations of multi-pack files. 

Converted Record Addresses 

The random routines require that the control data of 
each record be, or be converted to, the address of the 
first sector of a block. If only one record is written 
per block, these must be 6-digit disk addresses. If more 
than one record is written per block, these must be 
7-digit addresses in the form SSSSSSR. The first six 
digits are the address of the initial sector of a block 
within the file area. 

The seventh digit (R) designates the position of the 
record within the block. This number can range from 
0 to 9, allowing up to ten records per block. If only 
one record is written per block, this position is not 
used. If more than one record is written per block, the 
first is numbered 0; the second is numbered 1; the 
third, 2; and so on, to record 10 which is numbered 9. 
The maximum value that R is allowed to assume de- 


Record 0 1 42C 

00 
■ j 

Recorc 

10142002 Re 

cord 0142003 


353 

fcsSSSS 



Sector 

014200 

Sector 

014201 

Sector 

014202 

Sector 

014203 

Sector 

014204 


i i i i i i 

Figure 4. Four Records per Five-Sector Block 

termines the blocking factor (records per block) of 
the file. 

Figure 4 illustrates the addresses of records within 
a 5-sector block. In this example it is assumed that four 
125-character disk records are stored in each block. 
The control data of three master records converts 
to the following addresses: 0142000, 0142002, and 
0142003. 

From this example note, first of all, that these rec- 
ords are not considered synonyms. Each has a different 
units digit, thus, they are not part of the same chain. 
The relative position of each record within the block 
is represented by the digits 0 to 9 in the units position 
of the address. The maximum value that this position 
can attain is equal to the number of records per block 
minus one. Obtaining the relative low-order core-stor- 
age address of individual records within a disk block 
in a random file is accomplished by multiplying the 
record length by R -|- 1. 

General Operation of Program 

Before loading the data records, the file area is cleared 
to blanks. The disk addresses originally in the area are 
retained, thus allowing blocks to be arranged in the 
most advantageous order. Because the original ad- 
dresses are retained, the area must already be in the 
move mode. If the user requests that terminal record 
marks be written in the area-, they are inserted at this 
time in the low-order position of every record location 
in the file area. 

Note. When additions are being made to a file of records with 
no synonyms, the clearing routine is bypassed. See discussion 
of MASTR RDLIN card under Disk RDLIN Cards. 

After each record is read and assembled for process- 
ing, the program branches to the user’s conversion 
routine to develop a disk-storage address. The address 
is sought and the disk block in which the record is to 
be written is read into core storage. Once in core 
storage, the record location within the block is tested 
for availability by examining the availability indicator. 
This is the last position within the record except when 
terminal record marks are present. In this case, the 
next-to-last position is used as the availability indi- 
cator. If this position is blank, the record location is 
available. If it contains a character other than a blank, 
the location is occupied. 

If the location is available, the input record is a 
home record. To identify all home records uniquely. 
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A- and B-bits are placed in the third position of the 
overflow-address field (Figure 5). In addition to this, 
a digit 1 is placed in the availability-indicator position 
of the overflow-address field. The digit 1 is an avail- 
ability code, indicating the presence of a record. Note 
that if an overflow address is subsequently placed in 
a home record, the digit 1 is replaced by the units 
position of the overflow address. However, the A- and 
B-bits in the third position are restored, retaining the 
home-record identification. The record is then written, 
with the block, back into disk storage. 

If the availability indicator contains a character 
other than a blank, the input record is a non-home 
record. 

Non-home records are processed according to the 
operand punched in the nonhomes parameter card: 


Operand, Output 

RECINWORK The entire non-home record, preceded by its 
converted address, is written in a disk work 
area. 


RECONTAPE The entire non-home record, preceded by its 
converted address, is written on magnetic tape. 

RECINCARD The entire non-home record, preceded by its 
converted address, is punched into cards. On 
a 1440 system, this operation can be per- 
formed only on an ibm 1444 Card Punch. It 
cannot be done on an ibm 1442 Card Read- 
Punch. 


ADDINWORK If the input is from disk storage, the input 
disk addresses of non-home records, preceded 
by the converted addresses, can be written in 
a disk work area. 


1 ADDIN CARD 
or, 

5ADDINCARD 


If the input is from disk storage, the input 
disk addresses of non-home records, preceded 
by the converted addresses, can be punched 
into cards. The user can specify that either one 
or five sets of addresses be punched per card. 


PUNCHZONE On a 1440 system, if card input is read on an 
ibm 1442 Card Read-Punch, a zone can be 
punched in column 9 of the last card of each 
non-home input record. 

Note. This option cannot be taken if the user 
supplies a subroutine to assemble input rec- 
ords from cards (see Card Files under Input/ 
Output Files). 


Parameter Cards Required 


ROUTINE 

systemspec (optional*) 

DISKDRIVES 

exits (optional*) 

TYPEINPUT 

TYPERNUNLD 

(if reorganized) 

INPUTMEDIA 

INPMASTREC 


MASTCONTRL 

ADDRESSING 

MASTBLOCK 

MASTLIMITS 

nonhomes (if duplicate 
addressing) 
loadaudit (optional*) 
inlabels (if disk input) 
OUTLABELS 


* See Parameter Cards to find out when this card can be omitted 
from the source deck. 


Availability Position: (Last Position): 
Contains a Character Other Than a 
Blank if Location Is Occupied 


A and B Bits are 

Placed in this Position when 

Records Are Tagged 


Contains A and B Bits if the Next Overflow 
Record Is in the Same Block 


Contains A and B Bits if the Next Overflow 
Record Is in the Same Cylinder (131 1 only) 

Contains A and B Bits if Record 
Is a Home Record 




Figure 5. Overflow-Address Field of Master Records 


The user must supply his symbolic conversion rou- 
tine, unless PASS1 is being used to load a reorganized 
file with the converted addresses appended to the 
records. 


(PASS2) Pass-Two Random-Load Program 

This program loads all non-home master records in a 
file. The input can be in any one of the four forms de- 
scribed for non-home output under PASS1. 

If the input to PASS1 was from an ebm 1442 
Card Read-Punch and if the PUNCHZONE option 
was taken in the nonhomes card, all the original data 
cards are read, including those processed as home rec- 
ords during PASS1. Column 9 of the last card of each 
record is checked to see whether it contains a zone 
punch. If no zone is detected, the record was loaded 
as a home during PASS1 and is bypassed. If column 9 
has a zone punch, the record must be chained. The 
program then branches to the user’s conversion routine 
for the converted disk address. 

If any of the other options were taken in the non- 
homes card, the input includes the converted address. 
The conversion routine is therefore not required in 
these cases. 

The converted disk address is sought and read. Dur- 
ing this pass, all home addresses are occupied. Each 
link of the existing chain is searched until the last link 
of the chain is reached. This last record is used as a 
base record in searching for an available location. The 
non-home record is placed in an available location as 
near as possible to the base record. 
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In both 1311 and 1301 disk storage, if the record is 
written in the same block as the base record, its actual 
disk address is written in the overflow-address field 
of the base record with A- and B-bits placed over the 
fourth and fifth digits. 

In 1311 disk storage A- and B-bits are placed over 
the fourth digit only, if the record is written in the 
same cylinder but not in the same block as the base 
record (Figure 5). 

If the entire cylinder containing the base record is 
filled, an available location must be found in another 
cylinder. The cylinder that is searched depends on the 
machine configuration. 

The record is placed in a cylinder as close as pos- 
sible to that containing the base record (the last link of 
the chain) if: 

1. the master-file area is in 1301 disk storage, or 

2. the master-file area is in 1311 disk storage and the 
system has both 

a. the direct-seek feature, and 

b. more than 4,000 core-storage positions. 

The record is placed in a cylinder as close as pos- 
sible to cylinder 00 in the disk pack that contains the 
upper limit if: 

1. the master-file area is in 1311 disk storage and the 
system has either- 

a. fewer than 8,000 core-storage positions, or 

b. no direct-seek feature. 

Parameter Cards Required 

With the exception of the routine card, the same 
cards used in generating PASS1 must be used for this 
program also. All the operands must be the same, with 
the exception, perhaps, of the inputmedia card. The 
inputmedia card must be changed if the non-home 
records were written on tape in PASS1. (See INPUT- 
MEDIA Card). 

The conversion routine is supplied only if the 
PUNCHZONE option was taken in the nonhomes 
card. 


(RNADD) Additions Program 
for Master Records 

This program adds master records to an organized 
random file. Input can be from cards, disk, or tape. 
The specifications of the records added must be the 
same as those for the initial loading, but the input 
media need not be the same as for the initially loaded 
file. For example, the original file could have been 
loaded from disk, and the additions, from cards. Disk 


or tape input blocks need not be the same length nor 
have the same number of records per block as the 
original input file. 

After a record to be added is assembled for process- 
ing, the program branches to the user’s conversion rou- 
tine for a disk-storage address. The address is sought 
and the disk block is read into core storage. The ad- 
dress to which the control data converted can be: 

1. an unoccupied location 

2. the home address of an existing chain 

3. a location occupied by the second, third, etc., link of 
a chain. 

When the control data of a record converts to an 
unoccupied location, the record is considered a home 
record and is processed as in PASS1. 

When the control data of a record converts to the 
home address of an existing chain, RNADD adds the 
record to this chain by placing it in an available loca- 
tion -near the last link of the chain. This is done as 
in PASS2. 

If, however, the control data of a record converts 
to the address of a location occupied by the second, 
third, or higher link of an existing chain, the record 
contained in the link is removed and placed in another 
available location. The overflow-address field of the 
preceding link of the chain is modified to contain the 
new address of the displaced record. The new record 
is then written as a home record in the address to 
which its control data converted. 

For example, in Figure 6, locations 0072010, 0072101, 
0072620, 0072621, and 0072800 constitute the original 
chain. The record to be added converts to address 
0072621, which is occupied by the fourth link of the 
chain. To place the new record in its proper location, 
the record in location 0072621 is moved to 0072740 
and the overflow address in record 0072620 is changed 
to 0072740. 


Parameter Cards Required 


ROUTINE 

systemspec (optional*) 

DISKDRIVES 

exits (optional*) 

INPUTMEDIA 

INPMASTREC 

MASTCONTRL 


ADDRESSING 

MASTBLOCK 

MASTLIMITS 

loadaudit (optional*) 
inlabels (if disk input) 

OUTLABELS 


* See Parameter Cards to find out when this card should be 
omitted from the source deck. 


The user must supply the symbolic conversion routine 
when generating this program. 
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Figure 6. Additions to a Disk-Storage Chain 


Displaced Record 



(TRADD) Loading and Additions Program 
for Trailer Records 

This program loads or adds all trailer records in a file. 
Input can be from cards, disk or tape. Trailer records 
are loaded into a separate area of disk storage set 
aside by the user. This area must have contiguous ad- 
dresses throughout, and the area must be distinct from 
the master-file area. A master record can have any 
number of trailer records, and there can be no trailer 
without a master. 

A 7-digit address field is appended to the front of 
each trailer record as it is loaded. The low-order posi- 
tion of this field is used as an availability indicator. 
This position always contains a character if the loca- 
tion is occupied, and a blank if the location is vacant 
(Figure 7). 

Trailer records can be written with up to ten records 
per block. Neither the block length nor the blocking 
factor need be the same as in the master file. Each 


Trailer Record ►»! 


Address of the 
Next Trailer 
Record 








Figure 7. Layout of a 50-Character Trailer Record 


record is written in the space immediately following 
the last-stored trailer record. The addresses of subse- 
quent trailers belonging to the same master record 
are written in the address field of the preceding trailer 
record. These are always 7-digit addresses in the form 
discussed in the Converted Record Addresses section 
under PASS1. The seventh digit is retained even when 
the trailer file is unblocked; though in this case, it 
is always zero. 

The first record location in the trailer area contains a 
dummy record. Whenever an initial load of trailers is 
being performed, with either new or reorganized 
input, at least the dummy record location must be 
cleared to blanks in the move mode. At the comple- 
tion of the initial loading run and each subsequent 
additions run, the address of the first available loca- 
tion in the trailer area is placed in positions 8-14 of 
this dummy record. Positions 15-20 contain a count of 
the number of trailer-record locations left in the area. 


Parameter Cards Required 


ROUTINE 

systemspec (optional*) 

DISKDRIVES 

exits (optional*) 

TYPEINPUT 

TYPERNUNLD 

(if reorganized) 

INPUTMEDIA 

INPMASTREC 


MASTCONTRL 

ADDRESSING 

MASTBLOCK 

MASTLIMITS 

TRAILENGTH 

TRAILCNTKL 

TRAILBLOCK 

inlabels (if disk input) 

OUTLABELS 


* See Parameter Cards to find out when this card can be omit- 
ted from the source deck. 
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The conversion routine must be used with this pro- 
gram. 

Note. This program must be generated to load either new 
trailers or a file unloaded by RNUNLD (reorganized). If gen- 
erated to load a reorganized file, the typernunld card is in- 
cluded with one of the operands: ACTIVE, TAGGED, or 

BOTH. However, the program will load any of the three kinds 
of record. During the initiaj loading of a reorganized trailer 
file, when the dummy record is blank, all trailer address fields 
in the master area are blanked prior to loading the trailers. This 
prevents incorrect trailer address fields from remaining on 
master records after the trailer file has been reorganized. 

Note that an entire reorganized trailer file does not have to 
be loaded during the initial reorganizing run. In subsequent 
runs of the reorganized TRADD program, if the dummy record 
is not blanked, the program will operate as a normal addi- 
tions run. 


(RNDEL1) Delete or Tag Program 
for Master and Trailer Records 

This program is used either to delete or tag master 
records and their associated trailers. The tagged rec- 
ords can later be deleted by RNDEL2. The input to 
the program must be from cards and consists of the 
control data of the records to be deleted or tagged. 
The input cards can contain as many control fields as 
will fit on a card. The control data must be punched 
in contiguous card columns starting in column 1. If 
control fields in the records are broken in sections, the 
sections must be punched in the order of importance 
(as specified in the mastcontrl card, not neces- 
sarily in order of appearance in the records). 

The control data of each record to be deleted or 
tagged is converted to the home address of the chain 
containing the record. The home address is sought and 
each link of the chain is examined until the record is 
found. 

If the record is only to be tagged, A- and B-bits are 
placed in the sixth position of the overflow-address 
field of the master record and in the sixth position of 
the appended field of each trailer record. 

If the record is to be physically deleted, the opera- 
tion of the program depends on the location of the 
record. The record to be deleted can be: 

1. a home record with no overflows 

2. a home record with overflows 

3. an overflow record in an existing chain. 

If the record to be deleted is a home record and is 
the only link in a chain, the record is deleted by blank- 
ing the entire record. 

If the record to be deleted is a home record and if 
there are one or more additional finks in the chain, the 


0074125 (Home Address) 



Figure 8. Deletions from a Disk-Storage Chain 


home record is replaced by the entire contents (record 
and overflow address) of the first overflow location. 
The first overflow location is then blanked out. 

If the record to be deleted is an overflow record in 
an existing chain, the record is deleted (again by 
blanking the entire record) and the overflow-address 
field of the deleted record is placed in the previous 
fink of the chain. For example, in Figure 8 the record 
in location 0074926 is being deleted. To maintain a 
continuous chain, the address 0074282, which occupies 
the overflow-address field of location 0074926, must be 
placed in the overflow-address field of location 007- 
4200. 

Whenever a master record is deleted or tagged, all 
trailer records associated with it are also deleted or 
tagged. As with master records, trailer records are 
deleted by blanking the entire record. 

If all record locations have terminal record-marks, 
these are not blanked. 


Parameter Cards Required 


ROUTINE 

systemspec (optional*) 

DISKDRIVES 

exits (optional*) 

INPMASTREC 

MASTCONTRL 

ADDRESSING 


MASTBLOCK 
MASTLIMITS 
TRAILENGTH 1 

trailcntrl V if trailers 

TRAILBLOCK J 
TYPEDELETE 

loadaudit (optional*) 

INLABELS 


* See Parameter Cards to find out when this card can be omitted 
from the source deck. 


The conversion routine must be used with this pro- 
gram. 
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(RNDEL2) Delete Program for Tagged 
Master and Trailer Records 

This program deletes the master and trailer records 
that were previously tagged by RNDEL1. 

The program scans the disk-storage area between 
the master-file limits, deleting the previously tagged 
master records and their associated trailer records. Re- 
linking the chains from which records are deleted is 
accomplished in this routine in the same manner as 
in the RNDEL1 routine. 


Parameter Cards Required 


ROUTINE MASTLIMITS 

SYSTEMSPEC (optional*) TRAILENGTH 

DISKDRIVES TRAILCNTRL 

exits (optional*) minorcntrl 

INPMASTREC TRAILBLOCK 

MASTCONTRL TYPEDELETE 

ADDRESSING INLABELS 

MASTBLOCK 

* See Parameter Cards to find out when this card can be omitted 
from the source deck. 


The conversion routine is used by this program. 


Parameter Cards Required 

The parameter cards required to generate RNDEL 2 
are the same as those listed under RNDEL1. The 
conversion routine is required for this program if the 
file is chained. 


(TRDEL) Delete Program for Single 
Trailer Records 

This program deletes single trailer records. The input 
must be from cards and consists of the control data 
of the trailer records to be deleted. Each record is 
specified by two control fields: a major followed by 
a minor. The major control field is identical to the 
control data of the master record. The minor control 
field indicates the particular trailer record to be de- 
leted. The control fields are punched in contiguous 
card columns, starting in column 1. If the major con- 
trol fields are broken in sections, the sections must be 
punched in the order of importance, as specified in 
the mastcontrl card (not necessarily in order of ap- 
pearance in the records). Each card can contain as 
many complete control fields (major and minor) as 
will fit on a card. No spaces are left between control 
fields. 

The major control field is converted to the home 
address of the chain containing the master record. This 
chain is searched until the master record is found. 
From the trailer -address field in the master record, the 
program locates the first trailer record associated with 
that master. The trailer-record chain is then searched 
until the record identified by the minor control field 
is found. The trailer record is deleted by blanking it 
out. The trailer-address field of the deleted record is 
moved to the record preceding it in the chain. Termi- 
nal record marks are not deleted. 


(RNUNLD) Unload Program for 
Reorganizing a Random File 

This program is used to unload a random file of master 
or trailer records for subsequent reorganization and 
reloading. Master and trailer files must be unloaded 
separately. A file can be unloaded into cards, tape 
or disk storage. The program can unload: 

1. only the active records of a file 

2. only the tagged records of a file 

3. both active and tagged records. 

Several kinds of output are possible. The user’s 
choice is specified in the typerntjnld and unldmedia 
cards. 

Card Output. If the file is punched into cards, the 
resulting card records will be in the format shown 
in Figure 9. The first eight positions contain an 
identification number. This number is the same for 
all of the cards for one record and is unique for 
each record. 

Columns 9 and 10 contain .an intrarecord sequence 
number, beginning with 01 for the first card of each 
record. 

If desired, master records can be preceded by 
either the converted address of the record or the 
trailer-address field, or both. The overflow-address 
field is always stripped from master records, and the 
trailer-address field is always stripped from trailer, 
records. 

Non-home master records are indicated by a 12- 
punch over column 9 of the last card of the record. 

Tagged records (both master and trailer) are in- 
dicated by a 12-punch over column 10 of the last 
card of the record. 
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Figure 9. Card Ouput of RNUNLD 


Disk or Tape Output. Output on disk or tape can be 
blocked with up to 70 records per block. 

Unloaded master records can be in either of two 
formats, depending on the operands in the typer- 
nunld card. 

If CONADD is used, each master record is pre- 
ceded by a single character position that contains: 

1. A- and B-bits, if the record is tagged; otherwise, 
no zone bits. 

2. A 1-bit, if the record is a non-home record; other- 
wise, no numeric bits. 

This position is followed by a 7-digit field (6-digit 
if organized file is unblocked) that contains the con- 
verted disk address of the record. 

If NOCONADD is used, the record is preceded 
by only the single position for tag and home-record 
indication. 

The user also specifies whether the output master 
record is to include the 7-digit trailer-address field. 

When trailer records are being unloaded, the 
trailer-address field is stripped from the record. A 


single character position is appended to the front 
of the record. If the record is tagged, this position 
contains A- and B-bits. If the record is not tagged, 
this position contains a blank. 

Note. This tag-zone position is always appended, regardless 
of the operands: ACTIVE, TAGGED, or BOTH. 


Parameter Cards Required 


ROUTINE 

systemspec (optional*) 

DISKDRIVES 

exits (optional*) 

INPMASTREC 

MASTCONTRL 

ADDRESSING 

MASTBLOCK 


MASTLIMITS 

TRAILENGTH 

TRAILCNTRL 

TRAILBLOCK 

TYPERNUNLD 

UNLDMEDIA 

INLABELS 

OUTLABELS 


(if unloading 
trailer file) 


(if disk output) 


* See Parameter Cards to find out when this card can be omitted 
from the source deck. 


The conversion routine is used if the typeknunld 
card contains the entry CONADD. 
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Control-Sequential Programs 


The five Control-Sequential Disk-File Organization 
programs load and maintain a presequenced file. The 
programs construct and use a distribution index that 
makes it possible to locate records quickly within the 
file area. Linkage is established to records added and 
around records deleted. 


The control-sequential programs that can be gen- 
erated are: 


1. CSLOAD 

2. CSADD 

3. CSDEL1 

4. CSDEL2 

5. CSUNLD 


Loads a presequenced file and builds the dis- 
tribution index. 

Adds records to a sequential file 
Deletes or tags records 
Deletes previously tagged records 
Merges the main sequential file with any rec- 
ords added by the CSADD program and 
either: 

a. unloads the file for use with other programs 

b. reorganizes the file and rebuilds the distri- 
bution index. 


A complete set of control-sequential programs gen- 
erated for a given file normally includes each of the 
above-mentioned programs and at least one additional 
version of: 

1. CSDEL1 The first deletes records 

The second tags records. 

2. CSUNLD Various versions produce: 

a. 1-pass reorganization in a new file area 

b. 2-pass reorganization in the original area. 

c. Stripped, merged output for CSLOAD and 
other programs. If this type of output is 
used to reorganize a file, an additional ver- 
sion of CSLOAD is required. 


Work Tracks 

An area immediately preceding the main-file area may 
be required for these programs to use as working 
storage. One, two, or three tracks may be required, 
depending on the amount of core storage in the system, 
the kind of disk unit used, and whether disk or tape 
labels are used. 

Figure 10 shows the work area for both 1301 and 
1311 main-file areas. 

1. The first track preceding the main-file area is always 
required if the file is in 1301 disk storage. If the file 
is in 1311 disk storage, this track is used only in a 
4K system. It is used for temporary storage of pro- 


gram overlays. Nothing is retained on the track 
from one run to the next; therefore, it can be used 
as a work area by other programs. 

2. The second and third tracks preceding the main- 
file area are used to store disk-label checking rou- 
tines and tape I/O routines. If the programs neither 
process disk labels nor process tape input-output, 
these tracks need not be reserved. Nothing is re- 
tained on these tracks from one run to the next; 
therefore, they can be used as a work area by other 
programs. 

Note. When the first track is not used for program overlay, 
the program still skips to the second and third tracks to store 
the label routines. 


(CSLOAD) Load Program for 
Control-Sequential Files 

This program loads a presequenced file into disk stor- 
age. The card, tape, or disk input file can be in either 
ascending or descending sequence. The load program 
bypasses and prints the control field of any record 
that has control data out of sequence. At least the first 
block of the organized file area must be cleared to 
blanks in the move mode before performing the initial 
load. 

A maximum of ten records can be written in each 
block in a 4K system, and a maximum of 30 records 
per block, in an 8K or larger system. Unused positions 
at the end of disk blocks are padded with blanks. 

A field of blanks is appended to the end of each 
record as it is loaded. If the file is unblocked, this is 
a 6-digit field; if blocked, a 7-digit field. These fields 
are used for any sequence links made necessary by 
additions to, or deletions from, the file. 


CONTROL SEQUENTIAL FILE IN 1311 or 1301 DISK STORAGE 

Label Checking and Tape I/O Routines (if disk labels or any tape I/O) 

"Program Overlay (if 1311 file, this track used in 
4K system only) 


■ Data File 


Y k 

Three tracks pre- T 

ceding lower limit ‘—Lower limit of main file 


Figure 10. Work Tracks Preceding Main Sequential File Area 
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Figure 11. Dummy Record Preceding Main Sequential File 
Area 


A dummy record is written in the first record loca- 
tion in the file area (Figure 11). This dummy record 
contains: 

1. the address of the last record in the main-file area. 

2. the address of the last entry made to the distribu- 
tion index. 

3. the address of the first record in the file, if that rec- 
ord is not the one that immediately follows the 
dummy record. This situation arises when: 

a. a record is added in the additions area that se- 
quentially precedes the first record in the main 
area or, 

b. the first record in the main-file area has been 
deleted. 

The first position of the sequence-link field Contains 
A- and B-bits to indicate a dummy record. 

The first input record is written in the second record 
location, and each subsequent record is written in the 
next consecutive location. 


Distribution Index 

A distribution index is set up by CSLOAD as the file 
is loaded. This index is used to locate records within 
the sequential file. (See Random Processing of a Se- 
quential File.) The distribution index is also used by 
CSADD and CSDEL1. The user specifies the fre- 
quency with which entries are to be made to the index. 
An entry consists of the control data of a record, fol- 
lowed by its disk address. An entry can be made for 
the first record written in each cylinder or for every 
nth record. An entry is always made for the first and 
last records loaded. 

For example, if the user specifies that an entry is to 
be made for every 20 records, it is made for the first 


record, the twentieth, the fortieth, the sixtieth, and 
so on, until the last record has been loaded. An entry 
is then made for the last record unless it was already 
entered as a result of being an nth record. 

If a subsequent run is made with CSLOAD to load 
additional records at the end of the main-file area, the 
count begins again at 001 when entries are being made 
for every n records. The last entry made during the 
last run is not removed, and an entry is not made for 
the first record of this run. Thus, in this case, the con- 
sistency of the interval of n records between entries 
might be broken. Additions to and deletions from the 
file can also break the consistency of the intervals. 
However, if an entry is made once per cylinder, the 
entry made for the last record of the previous run is 
replaced by that for the first record in the next cylin- 
der, provided the last entry did not occur at the start 
of the cylinder. 

The index is written in disk storage in an area speci- 
fied by the user. The area must be within one disk 
pack or module. It is written one sector per block, with 
up to ten complete entries in one sector. The number 
of entries that can be written in a sector depends on 
the length of an entry. The length of an entry equals 
the length of the control fields in the record plus six 
if the file is unblocked, or seven if the file is blocked. 

The address portion of the entry indicates the posi- 
tion of the record within tKe block. Standard 6-digit 
disk addresses are used in an unblocked file. A seventh 
digit (R) is added to the addresses used with blocked 
files. These addresses are in the form: SSSSSSR. The 
first six digits are the address of the first sector in the 
block. The seventh digit (R) designates the position of 
the record within the block. This number can range 
from 0 to 9 and has: 

• No zone bits, for records 1-10 

• B-bit, for records 11-20 

• A- and B-bits, for records 21-30. 


Parameter Cards Required 


ROUTINE 

systemspec (optional*) 

DISKDRIVES 

exits (optional*) 

TYPEINPUT 

INPUTMEDIA 

INPMASTREC 


MASTCONTRL 

MASTBLOCK 

COLLATE 

DISTENTRY 

loadaudit (optional*) 
typecsunld (if reorganized) 
inlabels (if disk input) 
OUTLABELS 


* See Parameter Cards to find out when this card can be omitted 
from the source deck. 
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(CSADD) Additions Program for 
Control-Sequential Files 

This program is used to add records to a control- 
sequential file that has already been loaded. The rec- 
ords to be added must be in the same format as the 
original records and the additions-file area must follow 
the same file specifications as the original file area. 
The input media need not be the same as for the ini- 
tially loaded file. For example, the original file could 
have been loaded from disk, and the additions, from 
cards. Disk or tape input blocks need not be the same 
length nor have the same number of records per block 
as the original input file. The card, tape, or disk input 
must be in the same sequence (ascending or descend- 
ing) as it was for the load program. CSADD loads the 
additions records into a separately defined area of disk 
storage. The additions file area must be cleared to 
blanks in the move mode before performing the initial 
additions run. As each record is loaded, its disk ad- 
dress is written in the sequence-fink field of the record 
that sequentially precedes it in the file. The address 
of the record that sequentially follows the added rec- 
ord is placed in the sequence-link field of the added 
record. See Distribution Index under CSLOAD for a 
description of these addresses. 

The first record location in the additions area con- 
tains a dummy record (Figure 12). Whenever CSADD 
is used, the address of the last record added is placed 
in the first 6 or 7 positions of the dummy record. The 
next seven positions contain the number of records 
that can be added to the file. When the additions area 
is filled, this number is 0000000. The sequence-link 
field of this dummy record is blank except for A- and 
B-bits in the first position. These zone bits identify the 
dummy record. 

CSADD makes use of the distribution index to lo- 
cate records. It never adds new entries to the index. 
However, the program changes the last entry in the 
index when the record added sequentially follows the 
last record in the main-file area. In this case, the control 
data of the last record added replaces the control data 
of the last entry in the index. The disk address in the 
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Figure 12. Dummy Record Preceding Additions Area 


last entry remains the same and is still the address of 
the last record in the original file area. 

If additions are to be made to the end of the file 
(that is, if all the records to be added contain control 
numbers beyond the last control numbers of the origi- 
nal input) the load program (CSLOAD) may be used 
to load the additions. 


Parameter Cards Required 


ROUTINE 

systemspec (optional*) 

DISKDRIVES 

exits (optional*) 

INPUTMEDIA 

INPMASTREC 

* See Parameter Cards to find 
from the source deck. 


MASTCONTRL 

MASTBLOCK 

COLLATE 

loadaudit (optional*) 
inlabels (if disk input) 
OUTLABELS 

at when this card can be omitted 


(CSDEL1) Delete or Tag Program for 
Control-Sequential Files 

This program is used either to delete or tag records in 
a control-sequential file. The input must be from cards 
and consists of the control data of the records to be 
deleted or tagged. The input cards can contain as many 
control fields as will fit on a card. The control fields 
are punched in contiguous card columns, starting in 
column 1. If control fields are broken in sections, the 
sections must be punched in the order of importance 
(as specified in the mastcontrl card, not necessarily 
in order of appearance in the records). Records can be 
deleted in any sequence. When a large number of rec- 
ords are deleted, however, the records should be de- 
leted in sequence for fastest operation of the program. 

Tag Records. A- and B-bits are placed in the sixth 
position of the sequence-link field of each record 
tagged. 

Delete Records. Deleted records are replaced by 
blanks. Terminal record marks (if present) are re- 
written. If the record being deleted contains an ad- 
dress in its sequence-link field, this address is moved 
to the sequence-link field in the record that se- 
quentially precedes the deleted record. Otherwise, 
relinking is accomplished by moving the address of 
the record that follows the deleted record into the 
sequence-link field of the record preceding the 
deletion. 

This program uses the distribution index to locate 
records but does not make any changes to the index. 
If desired, this program can print all records deleted. 
The entire record is printed. 
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Parameter Cards Required 


ROUTINE 

systemspec (optional*) 

DISKDRIVES 

exits (optional*) 

INPMASTREC 


MASTBLOCK 

MASTCONTRL 

COLLATE 

TYPEDELETE 

INLABELS 


* See Parameter Cards to find out when this card can be omitted 
from the source deck. 


(CSDEL2) Delete Program for Tagged 
Control-Sequential Records 

This program deletes the records that were tagged 
by CSDEL1. 

The program scans the entire file, following the se- 
quence chain through the main-file area and the addi- 
tions area, and deleting the previously tagged records. 
Relinking the sequence chain is accomplished in this 
program in the same manner as in CSDEL1. 

This program does not use the distribution index. If 
desired, this program prints all records deleted. The 
entire record is printed. As in CSDEL1, terminal rec- 
ord marks, if present, are retained. 

Parameter Cards Required 

ROUTINE INPMASTREC 

SYSTEMSPEC (optional*) MASTBLOCK 

DISKDRIVES TYPEDELETE 

exits (optional*) inlabels 

* See Parameter Cards to find out when this card can be omitted 
from the source deck. 


(CSUNLD) Unload Program for 
Reorganizing a Control-Sequential File 

This program is used to unload a control-sequential 
file. A file can be unloaded into cards, disk storage, or 
tape. The program can unload: 

1. only the active records of a file, or 

2. only the tagged records of a file, or 

3. both active and tagged records. 

The possibility of several types of output is offered. 
The user’s choice is specified in the typecsunld and 
unldmedia cards. As the file is unloaded, the records 
in the additions area are merged with those in the 
main-file area. 

Card Output. If the file is punched into cards, the 
sequence-link field is stripped from the records. The 
cards are punched in the format required for input 
to CSLOAD (see Card Files, Figure 14). Tagged 
records are indicated by a 12-punch over column 10 
of the last card of the record. 


Disk Output. Three kinds of disk output are possible: 

1. Stripped Merge. If the typecsunld card has the 
operand NOLINK, the records in the main-file area 
and in the additions area are merged and written 
into a third disk area. The sequence-link field is 
stripped from the end of the records. A single char- 
acter-position is appended to the front of each rec- 
ord. Tagged records are indicated by the presence 
of A- and B-bits in this position. 

The ouput file can be reloaded by a version of 
CSLOAD generated to load a reorganized file. The 
tag bits are moved back to the sixth position of the 
sequence-link field when reloading, and the tag-bit 
position is dropped. 

If this form of output is used, the output file can 
be blocked with up to 70 records per block. 

No audit-trail print is available with this stripped 
merge. The distribution index is not rebuilt. 

2. Relocated Merge. If the typecsunld card has the 
operand LINK, the file is merged and loaded into 
a new file area in one operation. In this case the 
sequence-link field is blanked except for tag-zone 
bits, and the field is retained. The output file is re- 
sequenced and corresponds to the usual output of 
CSLOAD. 

Neither the block length (number of sectors per 
block) nor the blocking factor (number of records 
per block) need be the same in the new file as in 
the old. 

The distribution index is rebuilt as the file is 
loaded and can be written in the same area as be- 
fore or in a new area. The interval between entries 
in the index need not be the same as for the pre- 
vious file. 

The load audit option is available with this opera- 
tion. 

3. 2-Pass Merge. If the typecsunld card contains 
the operands LINK, 2PASS, the file is merged and 
then written back into the original file area. The 
primary use of this operation is to reorganize files 
that occupy more than half of the on-line disk- 
storage space. The program requires a disk work 
area at least equal in size to the old additions area 
plus one disk block of that additions area. 

The entire file is merged during the first pass. At 
the completion of this pass, the file is in sequence 
with the first sequential record in the second record 
location of the work area. The sequence continues 
through the entire work area and then continues 
from the first record location in the main-file area. 

During the second pass, the two sections of the 
file are written in the proper order in the output 
area starting at the lower limit of the original main- 
file area. 
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Neither the block length (number of sectors per 
block), nor the blocking factor (number of records 
per block), need be the same in the new file as in 
the old. However, the ratio of the old blocking factor 
to the old block length must not be greater than the 
ratio of the new blocking factor to the new block 
length. 

old blocking factor new blocking factor 

old block length new block length 

The distribution index is rebuilt as the file is 
loaded during the second pass and can be written 
in the same area as before, or in a new area. The 
interval between entries in the index need not be 
the same as for the previous file. 

The load audit option is available with this opera- 
tion. 

Tape Output: This is the same as for stripped-merge 
disk output. 


Parameter Cards Required 


ROUTINE 

systemspec (optional*) 

DISKDRIVES 

exits (optional*) 

INPMASTREC 

MASTCONTRL 

MASTBLOCK 


distentry j (if sequence- 

loadaudit >- link field is 

(optional*) J retained) 

TYPECSUNLD 

UNLDMEDIA 

INLABELS 

outlabels (if disk output) 


* See Parameter Cards to find out when this card can be omitted 
from the source deck. 



Input/Output Files 


Disk Files 

Object programs can be generated to operate on files in 
either or both 1311 and 1301 disk storage. For example, 
an input file can be on 1311 disk storage and the or- 
ganized output file on the 1301. Any given file or group 
of associated files, however, must be contained entirely 
in one or the other of the kinds of disk unit. This ap- 
plies to random master and trailer files and the work 
area used for disk output of nonhome records or ad- 
dresses. For control-sequential files, it applies to the 
main-file area, the additions area, the distribution- 
index area, and the temporary area used for a two- 
pass CSUNLD. 

All disk input and output areas used by these file- 
organization programs are defined by lower- and 
upper-limit disk addresses. The limits of the master- 
file area used by the random programs are specified in 
the mastlimits parameter card when generating the 
random programs. The limits of all other disk input/ 
output areas are specified at object time in IOCS bdlin 
macro information cards. These cards (referred to as 
bdlin cards) are used for all files regardless of 
whether they have associated disk header labels. The 
bdlin cards required for each file are described later 
in this section. 


Single- and Multiple-Area Files 

Certain disk input and output files can be defined as 
multiple areas by more than one set of limits. Others, 
depending on the particular program and the size of 
the system, must be contained within one area and 
defined as such within a single set of limits. 

A group of disk records can be defined with a single 
set of limits if the entire area is on-line at one time 
and if consecutive disk addresses are used throughout 
the area. A single exception to the requirement of con- 
secutive addresses is the case of a labeled 1311 file 
extending from the end of one pack to the beginning 
of another. These programs will skip the 20 addresses 
normally on the last track and continue on the first 
track on the next disk pack. For example, if the limits 
of a file area are given as 010000-030000, the program 
would read from 010000 to 019979 and then auto- 
matically bypass the header-label track and skip to 
another disk drive to read 020000 to 030000. 

Note: The last record of the last complete block in a disk 
pack can be, but need not be, an EOR trailer label. 


The limits of a single-area file are given in one bdlin 
card, regardless of the number of disk packs or mod- 
ules used. A rdlin card must be supplied for each area 
of a multiple-area file. 

Input Files 

The organized-file areas are used as input to the delete 
and unload programs. See Output Files for a descrip- 
tion of these areas. The specifications of the input files 
for each of the loading and additions programs are as 
follows: 

PASS1, PASS2, and CSLOAD. These programs can 
accommodate multiple-area input files, regardless of 
core-storage capacity. The program reads the first 
rdlin card and processes the area that it defines. 
If the end of a pack or module is reached (with or 
without an EOR trailer label) before the upper limit, 
the program automatically continues to the next disk 
pack or module. 

When an EOR trailer label is read and the upper 
limit has been reached, the program halts. If an 
EOR trailer label is read and neither the upper limit 
nor the end of a pack or module has been reached, 
the program also halts. The operator can supply the 
rdlin card for the next area and, if necessary, place 
a new disk-pack on-line. Pressing start causes the 
program to read and process the new rdlin card. 

When an EOF trailer label is read or when the 
upper limit of an input area is reached before find- 
ing an EOR or EOF trailer label, the program pro- 
ceeds to the end-of-job. 

RNADD, CSADD, and TRADD. The specifications of 
disk files allowable as input to the three additions 
programs depend on the core-storage capacity of the 
system on which the program is run. 

In a 4K system, input to RNADD and CSADD 
must be contained within one area and that area must 
be contained in a single disk pack or module. 
TRADD can accommodate a multiple-pack or mod- 
ule input file but it must be defined by a single set 
of limits as one area. 

In an 8K or larger system, input files can be 
broken into multiple areas on as many disk packs 
or modules as necessary. They are processed as de- 
scribed for PASS1, PASS2, and CSLOAD. 
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Output Files 

The following output files can be broken into multiple 
areas: 

1. Non-home records written by PASS1, if the entire 
record is written in the disk work area (RECIN- 
WORK option). 

2. The output of RNUNLD. 

3. The output of CSUNLD, if all of the appended 
fields are stripped from the output records (stripped 
merge). 

In the three cases mentioned here, where output files can 
consist of multiple areas, an EOR label is written and the 
program halts when the upper limit of the area defined is 
reached before all records are processed. The user can supply 
a new rdlin card and, if necessary, change output disk packs. 
Pressing start causes the program to read and process the new 
rdlin card. 


All other disk output must be contained within one 
contiguously addressed area. These areas are: 

1. The master-file area of the random routines. 

2. The non-home work area written by PASS1, if only 
the addresses of non-homes are written (ADDIN- 
WORK option). 

3. The trailer-file area produced by TRADD. 

4. The main-file area of the control-sequential pro- 
grams, whether produced by CSLOAD or CSUNLD. 

5. The distribution-index area produced by CSLOAD 
or CSUNLD. 

Note: This area must be contained in one disk pack or 
module. 

6. The additions area produced by CSADD. 


Disk RDLIN Cards 

A bdlin card must be supplied for each disk area (1311 
or 1301) to be operated upon by a program. These 
cards supply the control number(s) of the disk drive(s) 
or module(s) being used and the limits of the file area. 
If 1311 disk header labels are to be processed, the 
bdlin cards also contain the label information to be 
used. The cards are punched as follows: 

Columns Contents 

1-5 Area identification 

6-10 blank 

11-15 Disk drive(s) or module(s) on which the file 
area is located. 

16-20 RDLIN 


Note: Columns 21-54 are used only for labeled files in 1311 
disk storage. 


21-24 

File-Retention Period 

25-29 

Creation Date 

30-39 

File Identification 

40-44 

File Serial Number 

45-49 

Pack Serial Number 

50 

blank 

51-54 

File Sequence Number 

55-60 

Lower Limit 

61-66 

Upper Limit 


Area Identification. An entry identifying the disk area 
defined by the card. (Not to be confused with the 
file-identification field in the label portion of the 
card.) 

The area-identification field is used by these pro- 
grams to ensure that the rdlin cards are read in 
the proper order. The entires for the various areas 
are: 

INPUT = disk area(s) used as input to the loading and ad- 
ditions programs: 

1. PASS1 and CSLOAD — The file to be loaded. 

2. PASS2 — The INPUT cards used in PASS1 are used 
in PASS2 also, unless the RECINWORK, RECIN- 
CARD, or RECONTAPE non-home option is taken. 
See WORKF. 

3. RNADD, TRADD, and CSADD — The area contain- 
ing the records to be added. 

MASTR = the organized master-file area of the random rou- 
tines and the main-file area of the control-sequential 
routines. 

Note: Although there are no trailer records, thus no pos- 
sibility of master records in the ordinary sense, the main- 
file area of a control-sequential file is often referred to as 
the master file to distinguish it from the additions area. 

Note. PASS1 is used to make additions to a file with 
unique addresses. When making additions, punch an A 
in column 10 of the MASTR RDLIN card to bypass the 
routine that clears the file area. 

INDEX = distribution-index area 
TRAIL = organized trailer-file area 
ADDIT = control-sequential file additions area 
WORKF = output area for: 

1. PASS1 — non-home records or addresses. If WORKF is 
used in PASS1, the same card is used in PASS2. 

2. RNUNLD — all disk output 

3. CSUNLD — all disk output, except temporary area used 
during 2-pass unload (see TEMPF). 

The final reorganized area of a reorganized unload and 
the output area of a stripped unload are defined in the 
workf card. 

TEMPF = temporary file area during 2-pass CSUNLD. 
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Disk Drives or Modules 

If any portion of the file area is in a 1311 disk pack 
with addresses: 

000000-019999, punch the drive control number in column 11. 
020000-039999, punch the drive control number in column 12. 
040000-059999, punch the drive control number in column 13. 
060000-079999, punch the drive control number in column 14. 
080000-099999, punch the drive control number in column 15. 

The numbers punched are: 

0 for the first drive in the system 
2 for the second drive 
4 for the third 
6 for the fourth 
8 for the fifth. 

If any portion of the file area is in a 1301 module 
with addresses: 

000000-199999, punch the module identification in column 11. 
200000-399999, punch the module identification in column 12. 
400000-599999, punch the module identification in column 13. 
600000-799999, punch the module identification in column 14. 
800000-999999, punch the module identification in column 15. 

The characters punched are: 

? (plus zero) for the first module in the system 
B for the second module 
D for the third 
F for the fourth 
H for the fifth 

Note. These identification characters are not the same as the 
alternate codes used in the disk-control field (=}=, S, U, W, Y), 
nor are they the numeric portion of these characters (0, 2, 4, 
6, 8), as used in the rdlin cards read by IOCS-produced rou- 
tines in user programs. 

RDLIN. The entry RDLIN is derived from the IOCS 
RDLIN (read label information) macro instruction. 
To simplify programming, the same card is used by 
these routines for labeled and unlabeled files. 

Label Information. The information punched in col- 
umns 21-54 is discussed under Disk Labels. 

Address Limits. The lower limit punched in the 
INPUT RDLIN card is the address of the first sector 
in the first block in the area, regardless of its posi- 
tion within a track. The upper limit punched is the 
address of the first sector in the last block in the area. 

In all RDLIN cards other than the INPUT card, 
the lower limit must be the address of the zero 
sector of the first track in the area. The upper limit 
must be the zero sector of the last track in the area. 
If disk labels are written, this upper limit address 
is adjusted by the program and the actual upper 
limit address written in the label is the address of the 
last sector in the last track in the area. 


Disk Labels (1311 files only ) 

Files organized in 1311 disk storage can have disk 
header labels. If labels are specified, routines to process 
them are taken from the IOCS library. Header labels 
are not processed for 1301 files. If the load programs 
are to write 1311 disk header labels, the Disk Label 
Program (part of the 1440 and 1401-1311 disk utility 
program packages) must have been used to set up the 
initial header-label track. The IOCS publications de- 
scribe the standard 1311 disk header labels and the 
processing performed by the IOCS routines. 

The entries in parameter cards inlabels and out- 
labels determine whether header labels are to be 
processed and, if so, the extent of checking to be 
performed. The standard IOCS options are available. 
See Label Checking for label operations performed by 
each of the programs. 

input Header Labels 

The header-label checking performed on input files 
consists of a comparison between certain fields in the 
rdlin card and the corresponding fields in the header 
labels on the designated disk pack(s). If an equal 
comparison is made (on each pack designated), the 
file is accepted. If an equal comparison is not made; 
that is, if the label requested is not found, the program 
halts, allowing the user to replace the disk pack. 

The comparison is made using either the file- 
identification field only, or each of the first six fields in 
the rdlin card. When a full check on the header labels 
of a multiple-pack file area is performed, the pack 
serial number is checked on only the first pack. A one 
(1) is added to the file-sequence number for each sub- 
sequent pack. 

Output Header Labels 

The user chooses whether to have header labels writ- 
ten on his 1311 output files. If they are written at all, 
they must be written for all associated disk output 
areas. Thus, if labels are written for the master-file 
area, they must also be written for the trailer file and 
for the disk work area used for non-home records 
during PASS1. 

When writing header labels for output files, the user 
must insert a date card in the object deck. The date 
card is punched as follows: 


Columns 

Contents 

1-3 

082 

4, 5 

05 

6 

Word separator (0-5-8 punch) 

7, 8 

Year (for example, 63) 

9-11 

Day of year (001 represents Jan. 1, 
365 represents Dec. 31) 
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The date is used by the programs to ensure that 
there are no unexpired files with limits overlapping 
those in the header label that is to be written. 

If there are no unexpired files within the area, the 
label is written with each of the fields in the rdlin 
card copied into the corresponding location in the 
label. In the event of a multiple-pack output area, the 
process is repeated for each pack, using the same 
rdlin card. The existing pack serial number is retained 
in the labels on subsequent packs, and the file se- 
quence number is increased by one (1) for each pack. 
The limits written in the header label of each pack are 
the correct limits for the section contained within the 
pack. 

Cylinder Overflow 

When disk files are processed, certain block lengths are 
such that a block overflows from one cylinder to the 
next. For example, if 3-sector blocks are processed in 
an area where the first block begins in sector 000000; 
the last complete block in the first cylinder ends in 
sector: 

1311 1301 

000197 000797 

The next block begins in: 

1311 1301 

000198 000798 

and overflows to: 

1311 1301 

000200 000800 

Input to these programs can begin with any sector 
on a track. Therefore, depending on the starting ad- 
dress, cylinder overflow can occur in input files with 
any block length other than single-sector blocks. 

Output files must begin at the zero sector of the first 
track in the area. Therefore, cylinder overflow can 
occur in output files, only if the block length is not 
evenly divisible into 20. 

The programming necessary to process overflow 
blocks is generated in these programs if: 

1. input files have more than one sector per block. 
In this case, overflow blocks are checked for blank 
record locations. If records are present, they are 
processed; if not, the block is skipped. 

2. output files have a block length (sectors per block) 
that is not evenly divisible into 20. 

Cylinder overflow must not occur (on input or out- 
put) from one disk pack or module to the next. The 


disk block that would have caused such overflow must 
begin at the zero sector of the first track on the next 
pack. In the case of the random programs, it is up to 
the user’s conversion routine to ensure that pack over- 
flow does not occur and that the first block in subse- 
quent packs begins in the zero sector of the first track. 
The control-sequential programs automatically skip to 
the zero sector of the next pack or module. 


Address Structure and Mode of Operation 

These programs perform all operations in the move 
mode (7-bit coding). All input files, therefore, must be 
in the move mode. The random master-file area must 
be in the move mode before the initial run of PASS1 
is performed. At least the first record location (dummy 
record) in the following output-file areas must be 
cleared to blanks in the move mode before performing 
the initial run of the program indicated: 

1. main-file area written by CSLOAD 

2. additions area written by CSADD 

3. trailer area written by TRADD. 

Disk addresses must not be repeated on any track 
used by these programs. All disk addresses normally 
associated with a track must be present. Addresses 
must be in sequence within a disk block, but the blocks 
can be arranged in any order found most suitable for 
the file. For example, in a file with 5-sector blocks, the 
sector addresses on the first track could be written in 
the order: 0-4, 10-14, 5-9, 15-19. This kind of sequenc- 
ing can often greatly reduce rotational delay time. 

Two disk packs or modules containing the following 
related file areas must not have the same range of 
addresses: 

1. random master and trailer file areas. 

2. control-sequential main file, additions area, tempor- 
ary area (for 2-pass unload), and distribution index 
area. 

Disk areas used as input to the load and additions 
programs and output from the unload programs can 
have the same addresses as the organized-file areas. 

When the work tracks preceding the main-file areas 
are used for program overlays, they are written in the 
load mode. These tracks are not cleared at end-of-job 
and therefore remain in load mode after completion of 
of the program run. The first one or two tracks pre- 
ceding the random master file (used for the availability 
table) are written in the move mode. The only require- 
ment of concern to the user when initially preparing 
his disk areas is that these tracks haye the proper 
addresses. They can be in either the move or load 
mode and need not be cleared to blanks. 
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Block Length 

When disk files are processed, it is generally true that 
the largest possible block length (sectors read and 
written in one operation) results in the fastest process- 
ing. In a chained random file, the longer the block, the 
better the chance of storing non-home records in the 
home block. In a control-sequential file, the main ad- 
vantage is the fact that rotational delay time need be 
lost only once per block. There are exceptions to this 
rule: 

1. In a random file with no synonyms, the optimum 
block length is that number of sectors required to 
hold a single record. 

2. If the time required to process all of the records in 
a control-sequential block slightly exceeds a track 
revolution, it may be better to shorten the block, 
again minimizing the rotational delay. 

The block length chosen for a given file depends on 
many factors other than minimum read/write time. 
For example, a maximum of ten records can be writ- 
ten per block in the random files organized by these 
programs. Therefore, the block length used would 
never exceed that number of sectors required to hold 
ten records. Storage utilization is another factor that 
must be weighed and balanced with time savings. A 
particular block length might be used that is less than 
the maximum possible if that block length results in a 
minimum of wasted disk-storage space. 

The one overriding factor that always sets an upper 
limit on block length is the core storage available to 
read and write the block. The amount of core storage 
remaining for I/O areas depends on the amount re- 
quired for the actual program instructions, constants, 
work areas, etc. Because the block length of a file is 
normally the same for all programs that operate on the 
file (this must be true for the file-organization pro- 
grams), it can be no greater than that used in the 
largest of those programs. 

Block-Length Limits Set by File-Organization 
Programs 

The file-organization object programs are generated 
to fit the parameters of specific files. Only those opera- 
tions actually called for by the user are included in the 
programs. There are no unnecessary routines included 
to take care of several possible formats or contingen- 
cies. During operation of the programs, certain rou- 
tines are written in the work-area tracks preceding the 
master-file area. These routines are read and executed 
whenever needed. The amount of core storage required 
for the generated object programs can thus be kept at 
that minimum necessary to do the job. The remaining 
core storage can be used for input/output areas and 
the user’s subroutines. 

Some factors affecting the size of the object pro- 
grams are: 


1. the input media. 

2. whether the number of sectors per block is such 
that cylinder overflow is possible and, therefore, 
whether the routines necessary to handle it must be 
generated. 

3. whether there is one record per block in the organ- 
ized file, or more than one. 

4. the choice of available options, such as: 

a. kind of output for non-home records during 
PASS1 and the output requested for the unload 
programs. 

b. the load audit or print options. 

5. the length of control fields in the records and the 
number of subfields comprising the control data. 

6. whether chaining is required in a random file 
(chaining is required only if there are duplicate ad- 
dresses). 

7. whether trailer records are used. 

8. the special features used. 

Note. The use of certain special features, such as the ad- 
vanced programming feature, decreases the amount of pro- 
gramming needed and, therefore, leaves more room for data 
records. 

The additions programs, RNADD and CSADD, are 
the largest of the file-organization programs generated 
from any given set of parameters. Except in special 
cases involving trailer records, these additions pro- 
grams determine the maximum permissible block 
lengths. Because this is the case, it is usually true that, 
if a given input block and organized master- or main- 
file block fit the additions programs, they are permis- 
sible for the other programs also. 

Figure 13 shows the sizes of RNADD and CSADD 
object programs that were generated with a choice of 
parameters chosen to give minimum and maximum 
size programs. The values shown in the figure can be 
used as a guide in determining whether a proposed 
block length is well within the allowable range or if 
trial programs should be generated to test the exact 
combination of parameters and subroutines. The in- 
creased core-storage requirements in the 8K or larger 
systems is due to the fact that additional functions are 
performed in the larger systems and portions of pro- 
grams that are overlayed from disk storage in the 4K 
systems are kept in core storage in the 8K and larger 
systems. The largest single factor affecting the size of 
these programs is the room required to handle multi- 
ple-record blocks. The figure shows the maximum sizes 
of RNADD and CSADD when generated to process 
unblocked (input and output) files. 

The core storage remaining must be used for all 
subroutines supplied by the user (including conversion 
routines, exit routines, and card-assembly routines in 
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excess of 190 positions) and for the input/output areas 
shown in Figure 13. 

Note. Card-assembly routines supplied by the user replace 
a 190-position routine normally generated from the library rou- 
tines. 

RNADD is not used if there are no synonyms in a 
random file. CSADD is not used if all additions are 
made to the end of a control-sequential file. In these 
cases, PASS1 and CSLOAD set the limits on block 
length. 

The maximum block length of trailer files is set by 
TRADD. The block lengths possible for disk or tape 
output of the unload programs are set by RNUNLD 
and CSUNLD. 

Example 

Assume that the following file is to be organized as a 
random file with trailers in a 4K 1440-1311 system. 

Disk Input. 

131-character input record (130 character data 
record + terminal record mark) 400-character input 
block (3 records in 4 sectors) 


Disk Output. 

145-character master record (7-digit trailer ad- 
dress + 130-character data record -j-7-digit over- 
flow address 4- record mark) 

300-character master block (2 records in 3 sectors) 

To determine whether these files will fit, refer to 
Figure 13: 

Maximum RNADD object program = 3290 positions 

Input area == 400 positions 

Master-file block = 300 positions 

Master record = 145 positions 

Total core storage required = 4135 positions 

Thus, we see that this file would not fit in the maxi- 
mum case. But it must be emphasized that the maxi- 
mum case is an unusual case. Several factors can 
shorten the object program. For example, if the object 
machine has the indexing-and-store-address-register 
feature, 80 to 100 positions are saved. Note also that 
the maximum case assumes 30-character control fields, 
broken into three subfields. In this case it would be 
necessary to perform a trial generation of the RNADD 
program to see if the block will fit. 



OBJECT SYSTEM 


OBJECT 


1401 

■1311 



1440 

-1311 


1440 

-1301 

1460 

-1301 

INPUT/OUTPUT 

PROGRAM 

4K 

8- 

6K 

_ 4K 

8- 

16K 

8- 

16K 

8- 

16K 

AREAS USED 


Min. 

Max . 

Min . 

Max. 

Min. 

Max. 

Min . 

Max. 

Min. 

Max. 

Min. 

Max. 


RNADD (blocked) 

2510 


2420 

5140 

2530 


2450 

5160 

3980 

5320 

3960 


Input Area 

RNADD (unblocked) 




4730 


wmjM 


4750 


4880 



Master-File Block 
Master Record 

PASS1 (blocked) 

■ 

2450 


2450 

■ 

2480 

■ 

2480 


2580 

■ 

2550 

Input Area 
Master-File Block 

RNUNLD (blocked) 

■ 

2320 

■ 

2320 

■ 

2340 

■ 

2340 


2450 

■ 

2430 

Organized-File Block (master or 
trailer) Output Block (disk or tape) 

CSADD (blocked) 

2260 

f§lH 

2650 

4270 

2290 

3280 

2680 


2790 

4440 

2760 

4430 

Input Area 

CSADD (unblocked) 


ss| 


3120 


2970 




3250 


3240 

Main-File Block 
Additions-File Block 

CSLOAD (blocked) 

■ 

2870 

■ 

2930 

■ 

2910 

■ 

2970 


3050 

■ 

3010 

Input Area 
Main-File Block 

CSUNLD (blocked) 




HI 


M 


■ 

■ 



■ 

Main-File Block 

Stripped Merge 


2610 


(S 









Additions-File Block 

Relocated Merge 


2940 


B 





1 


■ 


Output-File Block (disk or tape) 

Two-Pass Merge 


2910 


2880 


2920 


IliJ 

1 

113 


mjsi 

TRADD (blocked) 


3210 


4250 


3210 


4250 


4350 


4350 

Input Area 
The larger of: 














Master-File Block 
Trailer-File Block 


Figure 13. Significant Generated Program Sizes 
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Tape Files 

Magnetic tape can be used as input to the load and 
additions programs and for output of the unload pro- 
grams. Output of non-home records by PASS1 can also 
be on tape. All tape files must consist of fixed-length 
records. There can be as many as 70 records per block. 
As with disk input/output blocks, the maximum allow- 
able block length depends on the core storage avail- 
able (see Block Length under Disk Files). Incomplete 
output tape blocks are always padded with blanks. 
The padding character on tape input is specified in the 
inputmedia card. 

When an end-of-reel condition is reached and an 
alternate tape unit is specified (by operand ALTTAPE 
in systemspec card), the change to the alternate unit 
is made automatically. If there is no alternate unit, a 
halt occurs to allow the operator to change the reel. 
These programs perform all tape operations on the 
following units: 

1401 and 1460 Programs: 

Input: First unit — 2 

Alternate unit — 3 
Output: First unit — 4 

Alternate unit — 5 

Dump Option (Output of Error Blocks) — 6 
1440 Programs: 

Input: First unit — 1 

Alternate unit — 2 
Output: First unit — 1 

Alternate unit — 2 

Dump Option (Output of Error Blocks) — 2 

The following programs accept input from magnetic 
tape: 

PASS1, PASS2, and CSLOAD. Input to these pro- 
grams can be either a single- or multiple-reel file. 
RNADD, TRADD, and CSADD. In a 4K system, in- 
put to these programs must be single-reel tape files. 
In an 8K or larger system, either a single- or multi- 
ple-reel file can be used. 

The PASS1, RNUNLD, and CSUNLD programs can 
write single- or multiple-reel tape output. PASS1 is the 
only program that can have tape input and output. 

Note. In 1440 programs, if tape input to PASS1 and the 
RECONTAPE nonhome option is specified, the nonhome rec- 
ords are written on unit 2. If card or disk input to PASS1, the 
nonhome records are written on unit 1. Do not make the mis- 
take of calling for more tape operations than are possible in the 
object system. For example, in a single drive system, tape input 
to PASS1 would preclude the possibility of either the RECON- 
TAPE nonhome option or the DUMP tape-error option. 


Tape Labels 

All tape processing in these programs is performed by 
IOCS routines. Files can be labeled or unlabeled and, 
if labeled, can have: 

1. Standard 120-character labels (Type A) 

2. Standard 80-character labels (Type B) 

3. Standard 84-character labels (Type C) 

4. Nonstandard labels 

Either of the following publications may be referred 
to for complete details about the formats of the three 
types of standard tape label and the processing tech- 
niques used: 

1. Input/Output Control System (on Disk) for ibm 
1401/1640: Specifications, C24-1489. 

2. Input/Output Control System for ibm 1440: Speci- 
fications, C24-3011. 

The entries in the inputmedia and unldmedia cards 
determine whether header and trailer labels are to be 
processed and, if so, the extent of checking to be per- 
formed. 

Exits are provided in IOCS for the user to insert his 
own routines for checking nonstandard labels. 

Note. If non-homes are written on tape, they are in the 
following format : 

If tape input to PASS1 has standard labels and the 
RECONTAPE option is chosen on the non-homes card, the 
non-homes output tape has type B (80-character) header label(s) 
and corresponding trailer label(s). The header label(s) contains 
PASS2NONHM in the file-identification field and a retention 
period of one (1) day (-001b). The trailer label contains a label 
identifier (lEORb or lEOFb) and the block count. A tape mark 
does not follow the header label. 

If tape input to PASS1 has nonstandard labels or no labels, or 
if input was from cards or disk, the non-homes output tape has 
the same blocking factor as the master file, without labels. A 
tape mark is written for an end-of-reel or end-of-file condition. 

Standard Input Header Labels 

With the exception of PASS2, if standard labels (A, 
B, or C) are specified in the inputmedia card, a tape 
rdlin card must be inserted in the program deck at 
object time. If standard label tape is input to PASS2, 
it is not necessary to provide a rdlin card. 

The standard header label checking performed on 
input tape files consists of a comparison between cer- 
tain fields in the rdlin card and the corresponding 
fields in the header label on the tape files. The com- 
parison is made using either the file-identification field 
only or each of the fields specified in the tape rdlin 
card. (In complete label checking of multi-reel files, a 
one (1) is added to the reel sequence number for each 
subsequent reel.) 
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PASS2 automatically supplies the RDLIN informa- 
tion for checking standard input tape header labels. 
The file identification field, only, is checked. If unequal 
comparison results in standard label checking, the pro- 
gram halts, allowing the user to replace the tape reel, 
if desired. 


Standard Output Header Labels 

The labeling of the tape output from PASS1 is deter- 
mined by the input. For the CSUNLD and RNUNLD 
routines, an unldmedia card specifies the kind of labels 
to be written on the output file. If standard labels (A, 
B, or C) are specified, a tape rdlin card must be 
inserted in the program deck at object time. Informa- 
tion from the rdlin card is written on the header label 
on all reels of a tape file. For multi-reel files, the reel 
sequence number is increased by one (1) for each sub- 
sequent header label. 

Before a standard header label on an output tape 
is written, the effective dates in the old header are 
checked to ensure that the data on the output tape is 
no longer active and may be destroyed. If the reten- 
tion period has not elapsed, a programmed halt occurs 
so that the tape may be changed (if desired). When 
standard labels are processed, a date card must be 
loaded into storage at object time so that the retention 
cycle checking can be performed. This card is punched 
as for 1311 disk output checking (see Disk Output 
Header Labels). 


Standard Input Trailer Labels 

If standard labels (A, B, or C) are specified in the 
inputmedia card, IOCS checks and writes correspond- 
ing trailer labels. Two fields on the standard trailer 
label are checked. The labels are checked for an end- 
of-reel or end-of-file condition. Also, a count of the 
number of blocks processed, which was accumulated 
automatically by IOCS, is compared with the block 
count recorded on the trailer label. If an error is de- 
tected in checking, a programmed halt occurs. 


Standard Output Trailer Labels 

Trailer labels are written for PASS1 output if the 
inputmedia card indicated standard label input. If 
standard labels are specified in the unldmedia card, 
trailer labels are written for tape output of CSUNLD 
and RNUNLD. An end-of-reel (EOR) or end-of-file 
(EOF) indication is written. IOCS writes the accumu- 
lated block count in the block-count field of the trailer 
label. Blanks are written in the remaining fields. 


Nonstandard Input Labels 

If nonstandard labels are specified in the inputmedia 
card, the programmer must provide his own symbolic 
routines (which are placed in the source deck after 
the parameter cards), to read and check header and 
trailer labels. IOCS exits 6 and 7 are generated auto- 
matically in the programs for this purpose. 

Exit 7 permits reading and checking of nonstandard 
input header labels. The user, in his routine, must pro- 
vide his own area for entering the header information 
and must program to read and check the information. 
The first instruction of the user’s routine must be 
labeled TEXIT7 and the last instruction must return 
control to the main program by branching to IOCSRE. 

Exit 6 permits reading and checking nonstandard 
input trailer labels. The user must provide, in his rou- 
tine, his own area for entering the trailer information, 
and he must program to read and check the informa- 
tion. The first instruction of the user’s routine must be 
labeled TEXIT6. Control is returned to the main pro- 
gram by branching to IOCSRE on an end-of-reel con- 
dition and to TAPEND on end-of-file. 

The block count is accumulated automatically and 
is available to the user whenever exit 6 is used. The 
count is in a 5-position field identified in the assembly 
listing by the following label: 

1401/1460 Package 1440 Package 

IOC2BK IOC1BK 

Nonstandard Output Labels 

If nonstandard labels are specified in the unldmedia 
card, the programmer must provide his own symbolic 
routines (which are placed in the source deck after the 
parameter cards) to build and write header and trailer 
labels. IOCS exits 2 and 5 are automatically generated 
in the programs for this purpose. 

Exit 5 is used to build and write nonstandard output 
header labels and to read and check the old header on 
an output tape. The user must program the checking 
procedure for the old header. His routine must provide 
its own area for building the new header information 
and the instructions to write the new header on tape. 
The first instruction of the user’s routine must be la- 
beled TEXIT5, and the last instruction must return 
control to the main program by branching to IOCSRE. 

Exit 2 is used to build and write nonstandard out- 
put trailers. The user must provide his own area for 
building the trailer information and must program 
to write the trailer label on tape. IOCS provides the 
user with an indication of whether the trailer is to 
be written for an EOR (end-of-reel) or EOJ (end-of- 
job) condition. If EOR, there is no word mark in a 
location labeled TPCLSW. If EOJ, TPCLSW contains 
a word mark. The first instruction of the user’s routine 


31 



must be labeled TEXIT2, and the last instruction must 
return control to the main program by branching to 
IOCSRE. 

The block count is accumulated automatically and 
is available to the user whenever exit 2 is used. The 
count is in a 5-position field identified in the assembly 
listing by the following label: 

1401/1460 Package 1440 Package 

IOC4BK IOC1BK, or 

IOC2BK, for nonhome 
count if tape input and 
output. 

The user’s tape exit routines must follow immedi- 
ately after the parameter cards in the source deck and 
must be followed by a ltorg card with an asterisk in 
the operand field. 

Tape RDLIN Cards 

A tape rdlin card must be placed in the program deck 
at object time if a tape file with standard labels is to 
be processed by the program. The rdlin card contains 
an identification field in columns 1-5 to indicate 
whether the tape file is an input or output file. Other 
data in the card must correspond to the fields of the 
particular standard label that will be checked or writ- 
ten on the tape file. 

The reel sequence number is automatically increased 
by one (1) for every reel after the first in a multi-reel 
file. All other parts of the header label should be iden- 
tical on all reels of an input tape file and will be writ- 
ten identically on an output file. 

A rdlin card does not have to be supplied for tape 
output of PASS1 or tape input to PASS2. These pro- 
grams automatically supply RDLIN information for 
reading and checking standard labels. 

The format of the rdlin card associated with each 
of the three kinds of standard header labels is as fol- 
lows: 


rdlin card for Type A (120-character) standard 
header label (fields 9-19 are not processed): 


Header-Label 

Columns Contents Field Number 

1-5 TAPEI — (for tape input 

to PASS1, RNADD, 

TRADD, CSLOAD 
and CSADD) 

TAPEO - (for 
tape output of 
CSUNLD and RNUNLD) 

16-20 RDLIN 


21-24 Retention Period 2 

25-29 Creation Date 3 

30-39 File Identification 4 


Header-Label 

Columns Contents Field Number 


40-44 

File Serial Number 

5 

45-48 

Reel Sequence Number 

7 

rdlin card 
header label: 

for Type B (80-character) 

standard 

Columns 

Header-Label 
Contents Field Number 

1-5 

TAPEI — (for tape input 
to PASS1, RNADD, 
TRADD, CSLOAD, 
and CSADD) 

TAPEO - (for 
tape output of 
CSUNLD and 
RNUNLD) 


16-20 

RDLIN 


21-25 

File Serial Number 

3 

26 

— (minus sign) 

4 

27-29 

Reel Sequence Number 

4 

30 

blank 

4 

31-40 

File Identification 

5 

41-45 

Creation Date 

6 

46 

— (minus sign) 

7 

47-49 

Retention Period 

7 

50 

blank , 

7 

rdlin card 
header label: 

for Type C (84-character) 

standard 

Columns 

Header-Label 
Contents Field Number 

1-5 

TAPEI — (for tape input 
to PASS1, RNADD, 
TRADD, CSLOAD, 
and CSADD) 

TAPEO - (for 
tape output of 
CSUNLD and RNUNLD) 


16-20 

RDLIN 


21 

blank 

3 

22-26 

File Serial Number 

3 

27 

blank 

4 

28-31 

Reel Sequence Number 

4 

32 

blank 

4 

33-34 

Creation Datq: Year 

5 

35 

blank 

5 

36-38 

Creation Date: Day 

5 

39-41 

blank 

6 

42-44 

Retention Period 

6 

45-50 

Label Information: 
blank 
Density 

Character Coding 
Checksum 
Block Sequence 
Checkpoint Record 

7 

51-68 

File Identification 

8 
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Label Checking 

The following outlines the header-label operations per- 
formed by each of the programs if called for in the 
parameter cards. Where nonstandard labels are used, 
an exit is provided to the user’s routine to perform the 
operation. 

PASS 1 

1. Checks header labels of disk or tape input file. 

2. Writes the header labels for the disk master-file 
area and the work tracks preceding it; or, checks 
the header labels if making additions to a uniquely 
addressed file. 

3. Writes the header labels for the disk work areas or 
tape output file used for non-home records or ad- 
dresses. A tape output file is labeled only if there 
was tape input with standard labels, 

PASS2 

1. Checks the header labels of the disk master-file area. 

2. Checks the header labels of all disk input areas 
and/or work areas or tape input files used for non- 
home records or addresses. For tape input, PASS2 
checks labels only if input to PASS1 was tape with 
standard labels. Only the file-identification field 
(PASS2NONHM) is checked. 

TRADD 

1. Checks header labels of disk input area or tape 
input file and the master-file area. 

2. If performing initial loading of disk trailer records, 
a header label is written for the trailer area. 

3. If adding trailer records, the header label of the 
disk trailer area is checked. 

RNDEL1, RNDEL2, and TRDEL 

1. Checks header labels of disk master file and trailer 
file (if trailers). 

RNUNLD 

1. Checks header labels on disk master or trailer area. 

2. Writes header labels for disk output-file areas or 
tape output file. 

C SLOAD 

1. Checks header labels on disk input-file areas or in- 
put tape file. 


2. If performing initial loading in area, writes header 
labels for the disk main-file area, for the distribu- 
tion index area, and the three work tracks preceding 
the main-file area. 

3. If adding records to the end of the disk main-file 
area, the header labels of the disk main-file area and 
the distribution index area are checked. 

CSADD 

1. Checks header labels on disk input-file areas or 
input tape file. 

2. Checks header labels of disk main-file area and 
distribution index area. 

3. If first additions to disk file, writes a header label 
for the additions area. 

4. If adding records to an established additions area, 
the header label of the area is checked. 

CSDEL1 

1. Checks header labels of the disk main-file area and 
the additions area (if separate additions area). 

2. Checks header label of distribution-index area. 
CSDEL2 

1. Checks header labels of the disk main-file area and 
the additions area (if separate additions area). 

CSUNLD 

1. Checks header labels of disk main-file area and 
additions area. 

2. Writes header labels lor output disk areas or output 
tape file. 

3. Writes header labels for distribution index and work 
tracks, if reorganized output. 

Card Files 

Card Input to Load and Additions Programs 

If input to the load and additions program is from 
cards, the user can either supply his own subroutine 
to assemble the disk records, or he can let the file- 
organization program assemble them. 

Regardless of whether the user supplies a subrou- 
tine to assemble disk records, the last data card must 
be followed by a card with the entry, ENDCD, 
punched in columns 1-5. 
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identification 

Number 


v 

-Q 

E 


70 Characters of the Record to be Stored 


(Not Part of 
Control Data) 


1 80-1001 


Figure 14. Format of the Input Card 


80 


Records Assembled by File-Organization Programs 

If the file organization programs are to do the assem- 
bling, the records must be in the format shown in Fig- 
ure 14. Each card within a record must contain the 
same identification number in columns 1-8. Note that 
this identification number is not considered to be the 
control data of the record. The control data is con- 
tained within the data portion of the record. Columns 
1-8 can contain any value (including all blanks) as 
long as the same value is repeated in each card of 
a record. The number need not be unique for each 
record. 

All cards composing one record must have sequence 
numbers beginning with 01 punched in columns 9 
and 10. 

The actual data that makes up the record is punched 
in columns 11-80. Thus each card can contain 70 char- 
acters of a record. A record can consist of up to 98 
cards. All records within a particular file must be the 
same length. 

Both the loading and additions programs examine 
the identification and sequence numbers to ensure that 
the correct record is written in the proper sequence. If 
a record contains an incorrect number of cards, an 
incorrect identification number, or if the cards of a 
record are out of sequence, the program prints an 
error message indicating the identification and se- 
quence number of the erroneous card. The program 
then halts or bypasses the record, depending upon 
the user’s choice of the operands HALT or BYPASS in 
the inputmedia card. 


Records Assembled by User's Subroutine 

If the user supplies a subroutine to assemble the disk 
records, a core-storage work area is generated by 
means of the following statements taken from the file- 
organization library routines: 

RECBEG DA IxU 

RECEND 1,U 

U equals the length of the user’s- input-data record 
and is taken from the value punched in the inpmas- 
trec card. The work area has no word marks other 
than the one in the high-order position. 

The following card-read routine is generated in each 
of the load and additions programs. The routine reads 
each input card and checks for the last card, which 


must have ENDCD in columns 1-5. 


REAERR 

.7 


(Note 1) 

INPUT 

R 


(Note 2) 


BIN 

REAERR, ? 



SS 


(Note 3) 


c 

5, KENDCD 
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(Note 4) 
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BE 

END 



B 

ASMBLE 



DCW 

@E@ 



DCW 

@N@ 



DCW 

@D@ 



DCW 

@C@ 


KENDCD 

DCW 

@D@ 


PROCES 

• • • 

• • • • 
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Note 1. With the exception of those halts generated from 
IOCS, all halts in these object programs are 2-character halts, 
with the alphabetic character appearing in the A-register for 
halt identification. 

Note 2. When reading from a 1442, this instruction includes 
the operand 1,1. 

Note 3. This instruction is not included if reading from a 
Model 1 of the 1442 that does not have the selective stacker 
feature. If two stackers are available on a 1442, the instruction 
is included with the operand 2. When reading from a 1402, the 
instruction is always included with the operand 1. 

Note 4. This compare operation is chained to allow word 
marks in any position of the read-in area. The following ex- 
plains how this compare works. 

There is one latch used for equal-unequal compare. This 
latch being on indicates an equal condition, while unequal is 
indicated by the latch being off. The equal-unequal latch is 
turned on at 1-2 time of a compare operation and then left on 
if the characters compared are equal, or turned off if they are 
unequal. This compare is during the B-cycle. 

The full-chained compare used here will turn the latch on 
during the first compare only, as this is the only time the ma- 
chine will get to 1-2. If any of the characters compared are 
unequal, the latch will be turned off and remain off. If all five 
characters are equal, the latch will remain on. Therefore, a 
complete compare is accomplished. 

The program reads a card into core-storage posi- 
tions 1-80. (Position 81 contains a group-mark with 
word-mark.) If no error occurs, the routine branches to 
ASMBLE, which must be the label of the first instruc- 
tion in the user’s assembly routine. The assembly rou- 
tine can then select any fields from 1-80 and move 
them to the defined area RECBEG. To facilitate field 
selection, the assembly routine can set word marks in 
the read-in area. No additional word marks may be 
set in the area labeled RECBEG. The assembly rou- 
tine then determines whether more cards are required 
for the record. On the basis of this decision, it either 
branches to INPUT or, if the entire record has been 
assembled, to PROCES, thus returning control to the 
file-organization program. 

In the event of a read error (REAERR), the pro- 
gram halts. The user can correct the cause of the error 
and press start to continue. 

The user’s assembly routine, in symbolic form, is 
loaded with the parameter cards. It is suggested that 
all labels other than ASMBLE be started with ZZ to 
avoid multiply defined symbols. 

Note 1. The user’s assembly routine must not use the move 
record (mrcm) instruction to move data from the input area to 
RECBEG. This instruction moves the group mark along with 
the data, and this position was not defined in the da statement 
shown above. 

Note 2. When a record is displaced by RNADD, it is held 
temporarily in the area labeled RECBEG. The area is not 
cleared before branching to process the next record. 

Card Output from the Unload Programs 

The card output produced by RNUNLD and CS- 
UNLD is discussed under the separate descriptions of 
those programs. 


Program Exits 

Exits are provided in each of the file-organization ob- 
ject programs. With one exception explained below 
(EXIT3), these exits are used to branch to the user’s 
subroutines. If tape input or output files are used with 
nonstandard labels, exits are automatically generated 
by IOCS. These exits are branches to routines (re- 
ferred to as TEXIT routines) supplied by the user to 
process the nonstandard labels. See Tape Labels for a 
discussion of the TEXIT routines. 

In addition to the nonstandard-label routine exits, 
three exits can be generated from the file organization 
routines. These are optional exits, called for in the 
EXITS parameter card by the parameters: EXIT1, 
EXIT2, and EXIT3. 

Exit 3 is available in all object programs. This exit 
is different from the others in that it does not cause a 
branch to a user subroutine. Instead, the program 
reads another card and branches to 001 at end-of-job. 
In this way, these programs can read in, and branch 
to, the first instruction of another loader program. 

Each of the other two exits is generated as a branch to 
a user subroutine. The user supplies these subroutines 
in symbolic source language and they are assembled 
along with the file-organization object program. The 
user’s routines are identified by the label (EXIT1 or 
EXIT2) of the first instruction in each. The EXIT1 
routine returns control to the main program by branch- 
ing to ENTRY1; the EXIT2 routine returns to 
ENTRY2. 

The following points must be considered when writ- 
ing all user subroutines: 

1. During operation of these programs, portions of 
the programs are written in the reserved tracks 
preceding the master-file area and are overlaid by 
other portions. Therefore, any word marks asso- 
ciated with group marks in the user’s routines must 
be set and cleared by the user’s routine. 

2. When TEXIT routines are used, they must be 
placed immediately after the parameter cards and 
before any other subroutines. They must be fol- 
lowed by a literal origin (LTORG) card with an 
asterisk in column 21. With that single exception, 
the user’s routines must not include any of the 
following statements: 

EX — Execute 
INCLD — Include 
LTORG — Literal Origin 
XFR — Transfer 

END — End of Assembly (except for the END START card 
after the last card in the source deck) 

3. If a subroutine uses index registers, it must first 
save the contents of the registers and restore them 
before returning control to the main program. 
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4. The first card in the first symbolic subroutine sup- 
plied by the user must not be a comments card. 

The following explains the points at which exits 1 
and 2 occur in the object programs. Figure 15 lists 
certain labels that may be useful in the user’s sub- 
routines. See Block Length under Input/Output Files 
for a discussion of the core-storage space available for 
subroutines. 

PASS1 

Exit 1 occurs after assembling the input record and 
before extracting the control data for conversion. 
This exit is not available if the user supplies an 
assembly routine for card input. 

Exit 2 occurs after writing the output record and be- 
fore performing the audit print. The exit does not 
occur after processing non-home records. 

PASS2 

Exit 1 occurs after assembling the input record and 
before extracting the control data for conversion. 

Exit 2 occurs after writing the output record and be- 
fore performing the audit print. 

RNADD 

Exit 1 occurs after assembling the input record and 
before extracting the control data for conversion. 

Exit 2 occurs after writing the output record and be- 
fore performing the audit print. 

TRADD 

Exit 1 occurs after assembling the input record and 
before extracting the control data for conversion. 
This exit is not available if the user supplies an as- 
sembly routine for card input. 

Exit 2 — not available. 

RNDEL1 

Exit 1 — not available. 

Exit 2 occurs after reading the master record to be 
deleted or tagged and before performing the audit 
print. The record has not been deleted or tagged 
but has been verified as the correct record. 

RNDEL2 

Exit 1 — not available. 


Exit 2 occurs each time a tagged master record is 
found. The record has not been deleted but has been 
verified as a tagged record. The program does not 
recheck for the tag zone after the exit. There is no 
exit after reading the tagged trailer records. 

TRDEL 

Exit 1 — not available. 

Exit 2 — occurs after reading the trailer record to be 
deleted and before performing the audit print. The 
record has not been deleted but has been verified as 
the correct record. 


RNUNLD 

Exit 1 occurs after reading each input record (master 
or trailer) and before processing the record. 

Exit 2 — not available. 

CSLOAD 

Exit 1 occurs after assembling the input record and 
before checking the record for sequence. 

Exit 2 occurs after moving the record to the output 
area and before performing the audit print. The out- 
put record has not been written. 

CSADD 

Exit 1 occurs after assembling the input record and 
before checking the record for sequence. 

Exit 2 occurs after writing the new record and after 
establishing the sequence linkage, but before the 
audit print. 

CSDEL1 

Exit 1 — not available. 

Exit 2 occurs after reading the record that is to be 
deleted or tagged and before performing the audit 
print. The record has not been deleted or tagged 
but has been verified as the correct record. 

CSDEL2 

Exit 1 — not available. 

Exit 2 occurs each time a tagged record is found. The 
record has not been deleted but has been verified 
as a tagged record. The program does not recheck 
for the tag zone after the exit. 
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CSUNLD 


Exit 1 — available only in a 2-pass unload. The exit 
occurs during the first pass, after moving the input 
record to the output area, but before writing the 
output block in the work area. 

Exit 2 — available with all three kinds of output. The 
exit occurs after moving the record to the output 
area and before the audit print. The output block 
has not been written. In a 2-pass program, this oc- 
curs during the second pass, before writing the 
record from the merged file back into the original 
file area. 

Note. The DMPADR labels in Figure 15 are used to modify 
the record in the output area. This can be done in Exit 1 
of a 2-pass program or in Exit 2 of a relocate or strip pro- 
gram. No label is provided to reach the output record dur- 
ing the second pass of a 2-pass program. 



Label 

Programs and Conditions for 
Presence of Label 

Core-Storage Field or Area Referenced 

RECEND 

All load and additions programs and 
RNUNLD. 

In the load and additions programs, this label refers to the last (low-order) position 
of the input record. If a terminal record mark is present on input, it has been 
stripped off. No overflow-address, sequence -link, availability indicator, or output 
record mark has been appended. 

In RNUNLD, this is the last position of the input disk record. Thus, it is the term- 
inal record mark, if RMIN. If NORMIN, it is the availability-indicator position of 
a master record or the last data character of a trailer record. 

RECBEG 

INAREA 

TAPEIN 

All load and additions programs, if 
card input. 

All load and additions programs, if 
disk input. 

All load and additions programs, if 
tape input. 

These three labels are used to refer to the first (high-order) position of the input 
record. If new input, this is the first position in the data record. No sequence-link 
or trailer-address fields have been appended. If reorganized disk or .tape input, the 
label refers to the tag-zone position appended to the front of the input record. 

PRINT 

Defined in all programs. 

In all programs, a DA statement is used to define the print area. This label refers to 
the first (high-order) position of the area. The print area always begins in position 
201. 

CONTD 

Defined in all random programs except 
RNUNLD with no converted-address 
output. 

The control data of each record is extracted (before exit 2) in the order defined in 
the MASTCONTRL card and placed in this field. The label refers to the last (low- 
order) position of the field. 

CONV1 

All random programs except RNUNLD 
with no converted-address output. 

This field contains the converted disk address of the record being processed. The 
address is available during exit 2. 

WORKN 

PASS2 and RNADD 

This is the label of a 6- or 7-digit field that contains the actual disk address used to 
write the record. The address is available during exit 2. 

FILLOC 

CSDEL1, if blocked file and no index 
registers . 

This is the label of a three -position field that contains the core-storage address of 
the last (low-order) position of the sequence-link field of the record being deleted 
or tagged. 

CHEKH6 

CSDEL2, if blocked file and no index 
registers . 

This is the character-adjusted label of the B-address of an instruction. The B- 
address is the core-storage address of the last (low-order) position of the sequence- 
link field of the record being deleted. 

DATA 

CSDEL1 and CSDEL2, if blocked file 
and index registers, or if unblocked 
file. 

This is the label of the last (low-order) position of the data record being deleted. 
Note: This is the last data character, not the sequence-link field. 

CL2+6 

RNDEL1 , if delete. 
RNDEL2, always. 

This is the character-adjusted label of the B-address of an instruction. The B- 
address is the core-storage address of the availability-indicator position of the 
master record being deleted. 

TAG+6 

RNDEL1, if tag. 

This is the character-adjusted label of the B-address of an instruction. The B- 
address is the core-storage address of the availability-indicator position of the 
master record being tagged. 

CLEART+6 

TRDEL 

This is the character -ad jus ted label of the B-address of an instruction. The B- 
address is the core-storage address of the last (low-order) position in the trailer 
record being deleted. 

DMPADR+3 

CSUNLD- Stripped disk or tape output 
only, with NORMOUT. 

This is the character-adjusted label of the B-address of an instruction. The B- 
address is the core -storage address of the last character in the record being unloaded. 

DMPADR-4 

CSUNLD- 

Two-pass program, if NORMOUT. 
Relocate program, if NORMOUT. 
Strip program, if RMOUT (not for 
card output). 

This is the character-adjusted label of the B-address of an instruction. In either a 
two-pass or relocating reorganization program, the B-address is the core-storage 
address of the last position in the sequence-link field of the record being processed. 
In a program that produces stripped output, the address is that of the record mark. 

DMPADR-5 

CSUNLD 

Two-pass program or relocate 
program, only if RMOUT. 

This is the character-adjusted label of the B-address of an instruction. The B- 
address is the core -storage address of the terminal record mark. 


Figure 15. Labels Used by Exit Routines 
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Parameter Cards 


The disk file-organization routines packages as sup- 
plied by ibm include special prephases for the corre- 
sponding Autocoder processor programs and 17 library 
routines. The object programs are generated from 
these library routines by means of an Autocoder assem- 
bly run. The file-organization prephase of Autocoder 
reads a series of parameter cards punched by the user 
and, from these, builds a parameter table. The macro 
generator of Autocoder then uses this table to select 
and tailor a symbolic program from the file-organiza- 
tion routines and from certain IOCS library routines. 
Any symbolic subroutines supplied by the user are 
then read and assembled along with the file-organiza- 
tion program. The output is an assembled object deck, 
ready to be used to operate on the file for which it 
was generated. 

Although these programs are produced by the macro 
generator portion of the Autocoder, it must be under- 
stood that they are not macros in the conventional 
sense. They cannot be used as subroutines with other 
programs, nor can more than one program be gener- 
ated and used concurrently during any particular run. 

The parameter cards required for these programs 
are shown in Figure 17. The cards are to be punched 
in the regular Autocoder format, with the label in 
columns 6-15 and the parameters, separated by com- 
mas, starting in column 21. 

The following checks are performed on the operand 
portion on each parameter card: 

1. The first four characters of alphabetic parameters 
are checked for misspelling. 

2. The @ symbols must not appear in any operand. 

3. Operands may not be greater than 11 characters. 

4. There can be no zone bits in numeric operands. 

5. The operands are checked for too many parameters. 

6. All parameters must appear in the prescribed order. 

7. When a parameter is indicated as necessary (in 
Figure 17 under Condition for Including Param- 
eter), the parameter must not be left out unless it, 
and all following parameters, are NO parameters. 
When the condition for including the parameter 
does not apply (for example, the parameter speci- 
fying type of disk unit if card or tape input in 
INPUTMEDIA card), simply leave the parameter 
out. Double commas are never used to show the 
commission of a parameter. 


Example: The following two sets of parameters 
in the operand of the EXITS card are considered to 
be the same: 

EXIT1, EXIT2, NOEXIT3 or 
EXIT1, EXIT2 

However, an error is detected if the card is 
punched: 

EXIT1, ,EXIT3 

Note: The SYSTEMSPEC, EXITS, and LOADAUDIT pa- 
rameter cards may be omitted from the source desk if all 
parameters are to be NO. All other parameter cards required 
must be supplied, regardless of parameters. This includes the 
INLABELS and OUTLABELS cards, even when using 1301 
disk storage. 


It is recommended that the NO parameters be in- 
cluded to provide more easily understood documen- 
tation of the programs. 

Numeric parameters are processed from right to 
left. Zeros are inserted in missing digit positions, and 
excess numbers are dropped from the left (high-order) 
end of entry. For example, if a 2 were punched for 
a parameter that required a 2-digit number, the pre- 
phase would insert the high-order zero, resulting in 
02. If 1234 were punched for the same 2-digit param- 
eter, the prephase would drop the two high-order 
positions, resulting in 34. 

The parameter cards are preceded by a card with 
the entry FILE in the operation-code portion of the 
card (columns 16-19). When Autocoder reads this 
card, it calls in the file-organization prephase, which 
reads the parameter cards. 

The first parameter card must be the routine card. 
The other cards required for a program can be entered 
in any order. 

The user’s symbolic deck must be followed by a 
card with the entry END in columns 16-18 and START 
in columns 21-25. This card follows any subroutines 
being used with the file-organization programs (con- 
version, card assembly, and exit routines). Unless 
batched assemblies are being performed, the END 
card is followed by a card with HALT in columns 
16-19. Figure 16 shows the makeup of the source deck. 
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Figure 16. Source Deck to Generate Object Programs 
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Summary of Parameter Cards Required 

MASTBLOCK 

INLABELS 

The following summary lists the parameter cards 

MASTLIMITS 


used in generating each of the 13 types of object pro- 

Parameter Cards for 

RNUNLD 

grams. 






ROUTINE 

ADDRESSING 

Parameter Cards for 

PASS1 and PASS2 

SYSTEMSPEC (optional) 

TRAILENGTH ) , r , , 

f (if unloading 



DISKDRIVES 

TRAILCNTRL > 7 , , 

ROUTINE 

MASTLIMITS 

EXITS (optional) 

\ trailer nle) 
TRAILBLOCK ) 

SYSTEMSPEC (optional) 

ADDRESSING 

INPMASTREC 

TYPERNUNLD 

DISKDRIVES 

LOAD AUDIT (optional) 

MASTCONTRL 

UNLDMEDIA 

EXITS (optional) 

NONHOMES 

MASTBLOCK 

INLABELS 

TYPEINPUT 

(if duplicate addressing) 

MASTLIMITS 

OUTLABELS (if disk output) 

INPUTMEDIA 

TYPERNUNLD 



INPMASTREC 

(if reorganized) 

Parameter Cards for 

CSLOAD 

MASTCONTRL 

INLABELS (if disk input) 



MASTBLOCK 

OUTLABELS 

ROUTINE 

MASTBLOCK 



SYSTEMSPEC (optional) 

COLLATE 

Parameter Cards for 

RNADD 

DISKDRIVES 

DISTENTRY 



EXITS (optional) 

LOADAUDIT (optional) 

ROUTINE 

MASTBLOCK 

TYPEINPUT 

TYPECSUNLD (if reorganized) 

SYSTEMSPEC (optional) 

MASTLIMITS 

INPUTMEDIA 

INLABELS (if disk input) 

DISKDRIVES 

ADDRESSING 

INPMASTREC 

OUTLABELS 

EXITS (optional) 

LOADAUDIT (optional) 

MASTCONTRL 


INPUTMEDIA 

INLABELS (if disk input) 



INPMASTREC 

OUTLABELS 

Parameter Cards for 

CSADD 

MASTCONTRL 






ROUTINE 

MASTCONTRL 

Parameter Cards for 

TRADD 

SYSTEMSPEC (optional) 

MASTBLOCK 



DISKDRIVES 

COLLATE 

ROUTINE 

MASTLIMITS 

EXITS (optional) 

LOADAUDIT (optional) 

SYSTEMSPEC (optional) 

ADDRESSING 

INPUTMEDIA 

INLABELS (if disk input) 

DISKDRIVES 

TRAILENGTH 

INPMASTREC 

OUTLABELS 

EXITS (optional) 

TRAILCNTRL 



TYPEINPUT 

TRAILBLOCK 

Parameter Cards for 

CSDEL1 

INPUTMEDIA 

TYPERNUNLD 



INPMASTREC 

(if reorganized) 

ROUTINE 

MASTBLOCK 

MASTCONTRL 

INLABELS (if disk input) 

SYSTEMSPEC (optional) 

MASTCONTRL 

MASTBLOCK 

OUTLABELS 

DISKDRIVES 

COLLATE 



EXITS (optional) 

TYPEDELETE 

Parameter Cards for 

RNDEL1 and RNDEL2 

INPMASTREC 

INLABELS 

ROUTINE 

ADDRESSING 

Parameter Cards for 

CSDEL2 

SYSTEMSPEC (optional) 

TRAILENGTH j 



DISKDRIVES 

TRAILCNTRL [ if trailers 

ROUTINE 

INPMASTREC 

EXITS (optional) 

TRAILBLOCK ) 

SYSTEMSPEC (optional) 

MASTBLOCK 

INPMASTREC 

LOADAUDIT (optional) 

DISKDRIVES 

TYPEDELETE 

MASTCONTRL 

TYPEDELETE 

EXITS (optional) 

INLABELS 

MASTBLOCK 

INLABELS 



MASTLIMITS 






Parameter Cards for 

CSUNLD 

Parameter Cards for 

TRDEL 





ROUTINE 

DISTENTRY ) (if sequence- 

ROUTINE 

ADDRESSING 

SYSTEMSPEC (optional) 

LOADAUDIT > link field is 

SYSTEMSPEC (optional) 

TRAILENGTH 

DISKDRIVES 

(optional) ) retained) 

DISKDRIVES 

TRAILCNTRL 

EXITS (optional) 

TYPECSUNLD 

EXITS (optional) 

MINORCNTRL 

INPMASTREC 

UNLDMEDIA 

INPMASTREC 

TRAILBLOCK 

MASTCONTRL 

INLABELS 

MASTCONTROL 

TYPEDELETE 

MASTBLOCK 

OUTLABELS (if disk output) 
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Figure 17. Parameter Cards (Part 1 of 5) 







Operand is Used in Generating 


Label 


Parameters and Possible 
Operands 

Condition for Including 
Parameter 

Valid 

Range 

CO 

£ 

CN 

CO 

£ 

a 

o 

< 

z 

OS 

<2> 

Q 

2 

b- 

3 

UJ 

i 

CN 

LU 

a 

z 

C*L 

UJ 

a 

O' 

RNUNLD 

D 

< 

0 

S3 

a 

a 

< 

S3 

UJ 

a 

u 

CN 

Q 

U 

Q 

z 

3 

U 

Explanation 

ROUTINE 

1 . Object Program to be 
generated (one of the 
following): 

PASS 1 , PASS2, RNADD, 
TRADD, RNDEL1, RNDEL2, 
TRDEL, RNUNLD, CSLOAD, 
CSADD, CSDELl, CSDEL2, 
CSUNLD . 

Always . 


X 


X 

X 

X 


X 

X 

X 

X 



X 

This must be the first parameter card and immediately follows the FILE card. 


1 . 

Direct seek feature: 
DIRECT or NODIRECT 

Always. 



1 










1 


If using 131 1 's with the direct seek feature , punch DIRECT. If using 13 1 1 's without the direct 
seek feature, punch NODIRECT. If using only 1301's, punch NODIRECT. 


2. 

Console printer: 

CONPRINTor 

NOCONPRINT 

Always. 















If the object machine has a console printer, punch CONPRINT; if not, punch NOCONPRINT 

SYSTEMSPEC 

3. 

4. 

5. 

Selective stacker feature: 
STACK or NOSTACK 

Alternate tape drive: 
ALTTAPE or NOALTTAPE 

Tape read error routine: 
ERRORSCAN or DUMP or 
blank 

A 1 ways . 

Parameters 4 and 5 are checked 
only when the program being 
generated is to process tape 
input or output . The parameters 
can be punched for all programs, 
however, allowing the sgme card 
to be used for each program 
generated . 


X 

X 

X 

X 

X 

X 

X 

X 

X 

X 

X 

X 

X 

If using a 1442 Model 1 without the selective stacker feature, punch NOSTACK. 

Otherwise, punch STACK. 

If multiple-reel tape files are to be read or written on alternate tape drives, punch ALTTAPE. 
If only one tape drive is to be used, punch NOALTTAPE. 

The procedure followed in the event of a permanent tape read error (failed to read after 100 
tries) depends on this parameter. If the operand is: 

a. Blank, the erroneously read tape block is bypassed. 

b. ERRORSCAN, the program halts, allowing the operator to scan core storage for the 
inval id character. 

c. DUMP, the erroneously read tape block is written on another tape drive for later 
investigation . 

DISKDRIVES 

1 . All disk units on line in 
object system: 

0, 2, 4, 6, 8, +0, B, D, 
F, H 

Always. 














X 

Punch 0, 2, 4, 6, 8 for 131 1 disk drives on line . 
Punch +0, B, D, F, H for 1301 modules on line. 


1. 

Exit after assembling input: 
EXIT! or NOEXITI 



1 


1 






| 





This card is optional in all programs. See Program Exits. 

EXITS 

2. 

Exit after processing output: 
EXIT2 or NOEXIT2 

Always. 




B 

X 


X 

X 

X 

E 

X 

X 

X 

X 



3. 

Read a card and branch to 

001 at EOJ . 

EXIT3 or NOEXIT3 

















TYPEINPUT 

1. 

2. 

Type of input file: 

NEW or REORGANIZED 

Home -re cord- indicator 
check: 

CHECK HOME or blank 

all load programs 

PASS! and PASS2 if 
reorganized . 


X 

X 

X 

X 


X 










If the input file was produced by RNUNLD or CSUNLD, punch REORGANIZED; otherwise, 
punch NEW. 

If the nonhome-record zone-bit indicator is to be checked by PASS), punch CHECK HOME; 
otherwise, leave blank. 


1. 

Input media and blocking. 

DISK, X, Y or 

If disk input. 

X= 1-98 
Y= 1-70 

X 


X 

X 





X 

X 




If disk input, punch DISK, X, Y where X = sectors per block 
Y = records per block , 

INPUTMEDIA 


CARD, X or 

If card input . 

X= 0-98 

X 


X 

X 





X 

X 




If card input, punch CARD, X where X= cards per input record. 
Note. If input records are assembled by user's subroutine, X =0. 

(cont .) 


TAPE, X 

If tape input . 

X= 1-70 

X 

X 

X 

X 





X 

X 




If tape input, punch TAPE, X where X= records per block . 
Note . If tape input to PASS2, X = 1. 


2. 

Type of disk unit. 
1 1 or 
01 

If disk input. 


X 

X 

X 

X 





X 

X 




If disk input from 131) disk storage, punch 1) . 
If disk input from 1301 disk storage, punch 01. 

















































































Figure 17. Parameter Cards (Part 2 of 5) 



3. Card read-error procedure. 
HALT or 
BYPASS 

Only if card input. Not used if 
records are assembled by user's 
subroutine . 



4. Tape padding character. 
Z or 
BLANK 

Only if tope input. 


INPUTMEDIA 

5. Tape labels . 

NOLABEL, Y or 
NONSTANDARD or 
STANDARD, A 
STANDARD, B 
STANDARD, C 

Only if tape input. 

Y= 1-98 


6. Tape mark following header 
labels . 

TPMRK or 
NOTPMRK 

Only if standard labels. 
Not used for PASS2. 



7. Extent of tape-label 
checking. 

ALL or 
IDENT 

Chly if standard labels. 
Isbt used for PASS2. 


INPMASTREC 

1 . Input master record length. 
X 

Always . 

Random: 

1-9799 

(unblocked) 

1-4899 

(blocked) 

Control 

Sequential 

13- 9794 
(unblocked) 

14- 4893 
(blocked) 


2. Terminal record mark on 
input master record. 
RMIN or 
NORMIN 

Always. 



3. Terminal record mark on 
output master and trailer 
records . 

RMOUT or 
NORMOUT 

Always 



1 . Position and length of first 
segment of control field. 

X, Y 

Always. 

. 


MASTCONTRL 

2. Position and length of second 
segment of control field . 

X, Y 

If two or three segments of 
control data. 



3. Position and length of third 
segment of control field. 

X, Y 

If three segments of control 
data. 


MASTBLOCK 
(cont .) 

1 . Sectors per block in master 

file: X 

2. Records per block in master 

file: Y 

Always 

Always 

X= 1-98 
Random: 

Y= 1-10 
Cont . Seq . 
Y= 1-10 (4K) 
Y= 1-30 (8K) 


If a record contains an incorrect number of cards, an incorrect identification number, or if the 
cards of a record are out of sequence, the program prints an error messoge indicating the 
identification and sequence number of the erroneous card. The program then holts or bypasses 
the record, depending on this parameter. 

If blocked tape input, punch the padding character. If unblocked tape input or if the padding 
character is blank, punch the word BLANK. 

Note. If tape input to PASS2, punch BLANK. 

If the input tape has: 

a. No labels, punch NOLABEL, Y where Y = the number of reels to be read. 

b. Nonstandard labels, punch NONSTANDARD. 

c. Standard 1 20-character labels, punch STANDARD, A. 

d. Standard 80-character labels, punch STANDARD, B. 

e. Standard 84-character labels, punch STANDARD, C. 

If a tape mark follows standard tape header labels, punch TPMRK; if not, punch NOTPMRK 
Note. Type-A labels must be followed by tape marks. 


The extent of header label checking performed depends on this parameter. 

ALL - All fields in tape RDLIN card are checked. (See Tape RDLIN Cards .) 
IDENT - Only the file-identification field is checked. 


When initially loading a file with PASS1, PASS2, or CSLOAD, and when mcking additions 
with RNADD or CSADD, X equals the actual length of the input record, including input 
terminal record marks. This count does not include fields added by the program such as trailer- 
address field, sequence-link field, or terminal record marks. 

When loading a reorganized file with PASS1, PASS2, or CSLOAD, X equals the actual length 
of the records produced by the unload program. This includes all appended fields such as 
trailer-address and converted-disk-address fields, the tag-zone position, end terminal record 
marks. (This value appears in the assembly listing of RNUNLD and CSUNLD in a DCW field 
labeled OUTL.) 

When generating TRADD and each of the delete and unload programs, X equals the length 
of the disk record in the organized master or main file, including all appended fields end 
terminal record marks. (This value appears in the assembly listing of PASS) and CSLOAD in 
a field labeled DISKL.) 

If input master data records have terminal record marks, punch RMIN; if not, punch NORMIN. 
For TRADD and all delete and unload programs, this parameter applies to the organized master 
or main file . 


If terminal record marks are to be written at the end of all output records, punch RMOUT; if 
not, punch NORMOUT. To generate TRADD and all delete programs, these parameters must 
be either: 

RMIN, RMOUT or 
NORMIN, NORMOUT. 


The control data in each master record can be a single field of up to 30 characters or it can be 
broken into two dr three subfields that total up to 30 characters. Regardless of the position of 
these fields in the data record, they are extracted and used as a single field. When two or 
three segments are defined, the second defined segment is placed to the right of the first, and 
the third to the right of the second. Each segment of the control data is defined by a parameter 
in the form: X, Y where: 

X = the low order (right hand) position of the segment within the data record, disregarding 
all appended fields. 

Y = the length of the segment. 


These entries always refer to the organized master or main file. 
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Operand is Used in Generating 


Label 


Parameters and Passible 
Operands 

Condition for Including 
Parameter 

Valid 

Range 

1 

CM 

to 

LO 

< 

a 

a 

< 

2 

SL. 

a 

o 

< 

at 

LU 

D 

z 

QC 

CM 

—1 

o 

Z 

.j 

LU 

D 

£ 

1 

2 

a 

6 

to 

a 

a 

< 

t/i 

s 

to 

U 

CM 

D 

to 

a 

_i 

Z 

O 

in 

Explanation 


3. 

Type of disk unit: 
11 Of 01 

Always 


| 

| 

I 

1 

| 

j 


1 


1 

1 

| 


If the organized file area is in 131 1 disk storage, punch ) 1 . 
If the organized file area is in 1301 disk storage, punch 01. 

MASTBLOCK 

4. 

Separate additions area: 
CSADAREA or 
NOCSADAREA 

Control sequential programs only. 
(Not checked by CSLOAD, but 
can be punched) . 











1 

1 

1 

1 

If a separate additions area is used, punch CSADAREA. If no additions are made, or if all 
additions are higher in sequence and are made to the end of the file area, punch 
NOCSADAREA. 

MASTLIMITS 

1. 

2. 

Lower limit of master file 
area. 

SSSSKO 

Upper limit of master file 
area. 

SSSSKO 

Always included for random 
programs . 


X 













This must be the address of the first sector in the first track in the area. (K must be an even 
number, 0 must be zero.) 

This must be the address of the first sector in the last track in the area. (K must be an even 
number, 0 must be zero.) 

ADDRESSING 

1. 

2. 

Converted addresses. 
DUPLICATE or 
UNIQUE 

Trailer files 
TRAILERS 
NOTRAILERS 

Always included for random 
programs. 


X 



1 

1 

i 

1 

1 






If chained file is used to accomodate duplicate converted addresses, punch DUPLICATE. 
If there are no duplicate addresses, punch UNIQUE. 

If trailer records ore used, punch TRAILERS; if not, punch NOTRAILERS. 

TRAILENGTH 

1. 

Length of input trailer 
records. 

X 

Included for all random programs 
that process trailer records. 

X= 20-9793 




I 

I 

j 

j 

j 






X equals the actual length of the input trailer records as read by the program being generated. 
It includes all appended fields present in the input but not those added by the program. When 
loading a reorganized file, it equals the length of the output trailer records produced by 
RNUNLD. (This value appears in the assembly listing of RNUNLD in a field labeled OUTL.) 
The delete programs and RNUNLD use the organized trailer file as input. Therefore, X for 
these programs is the length of the trailer records in the organized file. (This value appears 
in the assembly listing of TRADD in a field labeled TRLLTH. 


2. 

Terminal record marks on 
input trailer record. 
RMIN or 
NORMIN 






j 

l 

j 

B 

B 






If input trailer records have terminal record marks, punch RMIN; if not, punch NORMIN. 

TRAILCNTRL 

1. 

2. 

Position of first segment of 
major control field in 
trailers. 

X 

Position of second segment 
of major control field in 
trailers. 

X 

Always. 

If two or three segments of 
control data. 

X= 1-9793 














All trailer records must contain the same control data as their associated master records. The 
control data need not be in the same positions within the record, but it must be defined in the 
same sequence as it was in the MASTCONTRL card. 

The operands in the TRAILCNTRL card give only the low-order position of each master- 
control-data segment within the trailer record. 


3. 

Position of third segment of 
major control field in 
trai lers . 

X 

If three segments of control data . 






j 

B 

B 








MINORCNTRl 

1 . Position and length of minor 
control field in trailers. 

X, Y 

Used for TRDEL only. 

X= 1-9793 
Y= 1-30 




1 

1 

i 

i 

i 






X = the low-order (right-hand) position of the minor control field within the trailer record, 
disregarding the trailer address field. 

Y = the length of the minor control field , 

TRAILBLOCK 

1 . Sectors and records per 
block in trailer file. 

X, Y 

Included for all programs 
that process trailer records. 

X= 1-98 
Y= 1-10 




1 


i 

i 

X 






These entries apply to the organized trailer file. Neither the block length nor the blocking 
factor need be the same as in the master file. 

COLLATE 

1. Collating sequence 
ASCENDING or 
DECENDING 

CSLOAD, CSADD, CSDELi 





1 


i 

i 

1 






Collating sequence of the control sequential file. 
















































Figure 17. Parameter Cards (Part 4 of 5) 


Si 


DISTENTRY 

). Frequency of distribution 
index entries . 

X or 

CYLINDER 

Required for CS LOAD . Used for 
CSUNLD only if reorganized 
output . 

X= 1-999998 



1 



1 

1 



1 

1 


I 

An entry is made to the distribution index once every X records or once every cylinder . 

LOADAUDIT 

1. Audit trail print-out. 
PRINT or 
NOPRINT 

This card is optional 


1 

1 



1 

i 

i 







Specif/ whether the loading and additions programs are to print the control data of each record 
as it is loaded, along with the actual disk address where loaded. Use also with CSUNLD if 
reorganizing. If this card is used with RNDEL1 and RNDEL2, the control data and new disk 
address are printed for each record displaced by a deletion. RNADD also prints the control 
data and new disk address of any records displaced by an addition. 

NONHOMES 

1 . Nonhome record output . 
RECINWORK 
ADDINWORK 
RECONTAPE 
REC INCARD 
1 ADD INCARD 
5ADD INCARD 
PUNCH ZONE 

PASS! and PASS2only. 


| 

1 












See PASS! for a description of the nonhome output options. 

Note. Use PUNCHZONE only if punch unit is a 1442 card read-punch. Model 1 or 2. 
Use RECINCARD only if punching on a 1402 or 1444. 


2. Type of punch unit. 
PARALLEL or 
blank 

Use only with 1440 package. 






1 

1 

1 




1 



If using 1444 card punch for RECINCARD or xADDINCARD, punch PARALLEL. Otherwise, 
leave blank . 

TYPEDELETE 

1 . Type of delete program. 

DELETE or 
TAG 

2. Audit of deleted or tagged 
records. 

PRINT or 
NOPRINT 

All delete programs. 


1 

1 



1 







1 


If the generated program is to delete records, punch DELETE. If the program is to tag records, 
punch TAG. When generating RNDEL2, TRDEL, and CSDEL2, always punch DELETE. 

If the entry is PRINT, the entire deleted or tagged record is printed out. If no printing is 
wanted, enter NOPRINT. 

TYPERNUNLD 

1. File to be unloaded. 

MASTER or 
TRAILER 

2. Records to be unloaded. 

ACTIVE or 
TAGGED or 
BOTH 

RNUNLD always. PASS1, TRADD 
and PASS2 if reorganizing. 


X 

X 

X 

X 


X 

X 


1 


X 

X 






If the program is generated to unload a master file, punch MASTER; if generated to unload a 
trailer file, punch TRAILER. 

This parameter tells whether only the active, only the tagged, or both active and tagged records 
are to be unloaded. If there are no tagged records in the file, punch BOTH. 


3. Converted address with 
output . 

CONADD or 
NOCONADD 

Use only when unloading master 
records . 


X 

X 












If the converted disk addresses are to be appended to the front of output master records, punch 
CONADD; if not, punch NOCONADD. 


4. Trailer addresses withoutput. 
TRAIL or 
NOTRAIL 



X 

X 






E 






If the trailer-address fields are ro be retained on the front of output master records, punch 
TRAIL; if not, punch NOTRAIL. 


1 . Records to be unloaded. 
ACTIVE or 
TAGGED or 
BOTH 

Always used for CSUNLD. Used 
for CSLOAD only if reloading 
output of CSUNLD. 



1 

1 

1 

1 

1 

1 


j 

1 

1 

1 

j 

This parameter tells whether only the active, only the tagged, or both active and tagged 
records are to be unloaded. If there are no tagged records in the file, punch BOTH. 

TYPECSUNLD 

2. Sequence link with output. 
LINK or 
NOLINK 




1 

1 



I 



1 

1 


I 

1 

If the file is to be reorganized with the sequence-link field blanked but retained, and the 
distribution index rebuilt, punch LINK. If the file is to merged and written with the sequence- 
link field stripped, punch NOLINK 


3 . Type of unload program . 
2PASS or 
blank 

Used for two-pass unload only. 



1 

1 

1 





I 



I 

1 

If a two-pass program is to be generated, punch 2PASS. (If this entry is used, LINK must be 
used also.) If generating a program to produce a relocated merge or a stripped merge, leave 
blank . 

UNLDMEDIA 

(eont.) 

1 . Unload media. 

CARD or 
DISK or 
TAPE 

2. Disk output blocking. 

X, Y 

Always used for RNUNLD and 
CSUNLD. 

Disk output only. 

X= 1-98 
Y= 1-70 

i 

CN 

£ 

% 

E 

"0 

1 

rndell 

1 

0 

-o 

i 

1 

“O 

8 

1 

2 

0 

~o 

3 

X 

c 

D 

U 

X = sectors per output block . 
Y = records per output block . 
















































Figure 17. Parameter Cards (Part 5 of 5) 


Operand is Used in Generating 


Label 

Parameters and Possible 
Operands 

Condition for Including 
Parameter 

Valid 

Range 

PASS1 | 

1 ZSSVd 

RNADD | 

TRADD | 

RNDELl | 

CN 

—1 

o 

2 

02 

LU 

a 

£ 

RNUNLD | 

a 

6 
— i 

<✓> 

u 

c 

a 

< 

u 

LU 

a 

in 

V 

CN 

—1 

s 

CO 

Q 

_J 

2 

D 

to 

U 

Explanation 


3. 

Tape output blocking . 
Y 

Tape output only. 

Y= 1-70 

1 

1 






I 





n 

Y = records per output block . 


4. 

Type of punch unit. 
PARALLEL or 
blank 

Used only with 1440 package. 


I 

1 






H 






If using a 1444 card punch for card output, punch PARALLEL; otherwise, leave blank. 

UNLDMEDIA 

5. 

Type of disk unit. 
1 1 or 
01 

Disk output only. 


I 

1 











B 

If disk output on 1311 disk storage, punch 1 1 . 
If disk output on 1301 disk storage, punchOl. 


6. 

Tape labels. 
NOLABELS 
NONSTANDARD 
STANDARD, A 
STANDARDS 
STANDARD ,C 

Tape output only. 


| 

1 












If the output tape is to be written with: 

a. No labels, punch NOLABEL. 

b. Nonstandard labels, punch NONSTANDARD. 

c. Standard, 120-character labels, punch STANDARD,A. 

d. Standard, 80-character labels, punch STANDARD, B. 

e. Standard, 84-character labels, punch STANDARD, C. 

INLABELS 

1 . Extent of label checking on 
disk input. 

NOHEADER or 
PRTHEADER or 
CHK HEADER 

If disk input (131 1 and 1301). 
Note: Organized file area is 
considered input to delete and 
unload programs. 


1 







i 





i 

If 1311 disk input has no header labels, or if 1301 input, punch NOHEADER 
If input disk header labels are to be checked: 

a. On file identification field only, punch PRTHEADER. 

b. In their entirety, punch CHKHEADER. 


). 

Output disk header labels. 

NOHEADER or 
HEADER 

If disk output (1311 and 1301), 


| 

[ 


D 

1 

1 

1 

B 

B 

\ 

| 


i 

If header labels are to be written for 131 1 disk output files, punch HEADER. 
If 130) output, or if no labels on 13)1 output, punch NOHEADER. 

OUTLABELS 

2. 

Extent of label checking on 
subsequent runs against 
organized file. 

IDE NT or 
ALL 

All load and additions program* 
only if HEADER punched as 
first parameter. 


I 



I 

1 

1 

1 

1 

I 

I 

1 


1 

If header labels are written for the organized-file areas, this parameter specifies the extent of 
label checking to be performed during subsequent runs. The parameter is not required for 
RNUNLD or CSUNLD but can be included. 



































Random File Example 


The format of the file used throughout this example 
is shown in Figure 18. It is a hypothetical file, with 
many features included for the purpose of example. 
In order to make the example more meaningful, let us 
discuss the purpose of the file and the operations that 
are to be performed. 

The file is conceived as an accounts-receivable file. 
It consists of a master file of customer accounts and a 
trailer file containing all transactions. The transactions 
are loaded as they occur, and the master records are 
updated semimonthly during a billing run. Again, it 
should be emphasized that this file has features in- 
cluded for the purpose of example and that it is cer- 
tainly not recommended as the best way to organize 
typical accounts-receivable files. In the first place, it 
is more likely that the master records be updated daily, 
rather than loading the transactions separately as 
trailer records. However, the master-trailer approach 
can be useful in applications where the trailer file 
alone is to be used as input to programs that process 
information about the sales without regard to the 
specific customer accounts. For example, a program 
might process the trailer file (without looking at the 
master file) to compute sales commissions. If the trailer 
records included details about the specific items pur- 
chased, the trailer file could be processed by programs 
that assist in merchandise management. 

In the sample file, there is a master record for each 
customer account. This master record contains the ac- 
count number, the customer name and address (used 
in billing), and such current information as: 

1. beginning balance 

2. ending balance 

3. credit limit 

4. average number of purchases for a given period 
of time 

5. total purchases for the life of the account 

6. standard discount rate 

The beginning and ending balances are aged, show- 
ing the amounts of the balance that is over 30 days 
old, over 60, and over 90. 


All transactions against the file are entered as trailer 
records. These transactions include: 

1. purchases 

2. return of goods 

3. payments 

The three kinds of transactions can be entered from 
the same form. In fact, a single trailer record can in- 
clude all three kinds. 

Periodically, the file is processed by a billing pro- 
gram. This program processes those records called for 
in a processing-order file (POR). The POR contains the 
control fields of all of those records that are to be 
billed at a certain time of the month. The program 
reads the master record and then follows the trailer 
chain (if any) and updates all applicable fields in the 
master record. The bill is then printed out. As each 
trailer record is processed, it is tagged in the same way 
as RNDEL1 tags records (A- and B-bits over the 
sixth position of the trailer-address field appended to 
the trailer record). In order to repack the trailer area, 
doing away with those records that have been proc- 
essed, RNUNLD is used to unload all trailer records 
that are not tagged. These trailers are then reloaded 
with a version of TRADD that is generated to load a 
reorganized file. 


Note. The systemspec and diskdrives cards describe the 
system on which the programs are to be run and the procedure 
to follow in the event of a tape-read error. These are factors 
that normally do not change from one program to the next. 
These cards can be the same for all programs even though a 
particular parameter is sometimes not needed. In Figure 19 for 
example, the ALTTAPE and ERRORSCAN operands are 
punched although there is no tape input or output in PASS1. 
These parameters are required for the tape output and input 
assumed for the reorganizing programs, however, and the pro- 
grammer may wish to use the same card in all programs. 

The same is true for the diskdrives card: it is suggested 
that this card contain the control numbers of all disk units in 
the system regardless of the specific units used by a particular 
program. Once a program is generated, the specific units used 
are specified at object time in rdlin cards. 
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INPUT MASTER RECORD 


Customer , , 

Name Address 


1 1 24l25 

INPUT MASTER BLOCK 


1st Record 


1st Sector 

OUTPUT MASTER RECORD 


2nd Record 



1 2nd Sector 


1 3rd Sector 


1 4th Sector 


Trailer | Customer 
Address Name 
_ ~ 

OUTPUT MASTER BLOCK 
1st Record 
1st Sector 

INPUT TRAILER RECORD 


Address 

31132 


Account 

Number 


Ovflo + 

Addr.l'l 


2nd Record 


2nd Sector 


3rd Sector 


*10 Blanks 









<5 






"E 





CD 

_Q 

0 

z 


First 18 



E 

a> 

0 

Account 

Positions of 


Invoice 

z 

c 

<D 

Number 

Customer 


Number 

c 

0 



Name 



E 

CO 





s 

0 

00 

~o 





0 

U 





7-8 


11 16 

17 

CO 

35 39 


9-10 

OUTPUT TRAILER RECORD 


Trailer 

Address 


ll |8 114 

Figure 18. Record Formats in Sample File 



First 18 Positions 

Invoice 

of Customer Name 

Number __ 

1 — 
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Form X24-1350 
Printed in U S A. 


IBM 

Program 1 

Programmed by 

Date 


INTERNATIONAL BUSINESS MACHINES CORPORATION 


AUTOCODER CODING SHEET 

IBM 1401-1410-1440-1460 


Identification 

76 60 

Page No.l_i_J of 

i 2 


Line 
3 5 

Label 

6 15 

Operation 
16 20 

OPERAND 

21 25 30 35 40 45 50 55 60 65 70 

0. 1 

i 

I . , . 

F , L £ 


0 2 

R,6 ,E/,r, / , , 



0.3 
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Figure 19. Parameter Cards for Sample PASS1 Program 


Load and Additions Programs 
PASS1 

Figure 19 shows the parameter cards used to generate 
the PASS1 object program for the sample file shown 
in Figure 18. 

Input File 

TYPEINPUT — This program is to perform the initial 
loading of the file. If a program is generated to re- 
organize the file after using RNUNLD, all of the cards 
that define the input would be changed except the 
mastcontrl and addressing cards. 

INPUTMEDIA — Input is from 1311 disk storage. 
There are three data records per 4-sector input block. 

Note: Assume that the disk input file was produced as the 
output of a sort program. As was mentioned, the master records 
include a field that shows the average number of purchases in 
a given period of time. The file could be sorted on this field, 
thus placing the most active records first in the file. This as- 
sures their being loaded in a home-record location or in a 
prime position in a chain. 

INPMASTREC — The input records are 131 characters 
long, including a terminal record mark after each rec- 
ord. This card also specifies that the output records 
are to be followed by terminal record marks. These 


output record marks are placed after the overflow- 
address field. 

Note: If it were desired to leave the record mark at the end 
of the output data record and before the overflow-address field, 
the operands would be: NORMIN, NORMOUT. 

These programs would then treat the record mark as 
simply the last character of the data record. 

MASTCONTRL — In a file of this kind, a good distri- 
bution of disk addresses can usually be obtained from 
the account number alone. In this example, however, 
the first 18 positions of the customer name are used 
along with the account number. This might be desir- 
able if it were found that certain groupings or patterns 
in the account numbers show up in the disk addresses. 
Note that the positions of these two subfields are al- 
ways defined relative to the first position of the data 
record, disregarding fields appended to the front of 
the disk record by the load or unload programs. 

ADDRESSING — The control fields and conversion 
routine used can produce duplicate disk addresses. 
Trailer records are to be linked to the masters. 

Output File 

MASTBLOCK — The output file is to be written in 
1301 disk storage. Two master records can be written 
in each 3-sector output block. 
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MAST LIMITS — One fourth of the first 1301 module 
is to be used for the master file. The first five tracks 
are reserved as work tracks. 

LOADAUDIT — The control data of each record is to 
be printed as it is loaded, along with the actual disk 
address of the record. 

NONHOMES — When a non-home record is encoun- 
tered, its converted disk address and its input disk 
address are to be punched. Five sets of these ad- 
dresses are punched in each card. 

Disk Labels 

INLABELS — The disk input file has header labels. 
This program is to check the file-identification field 
in these labels. 

OUTLABELS — Because the output file is in 1301 
disk storage, there is no possibility of output header 
labels. However, the outlabels card is required with 
the entry NO HEADER. 


Conversion Routine 

Figure 20 shows a conversion routine for the sample 
file. This symbolic routine is placed after the param- 
eter cards for all of the programs except PASS2. 

Note. The routine would be used for PASS2 also, if the non- 
homes card had the operand PUNCHZONE. It would not be 
used for RNUNLD if the typernunld card did not include the 
operand CONADD. 

The routine converts the customer name and customer 
number fields in the master and trailer records to valid 
disk addresses. 

PASS2 

The same cards used for PASS1 are used to generate 
the PASS2 load program. The operand of the routine 
card is changed to PASS2, and all of the other cards 
remain the same. 

Note. If the RECONTAPE option had been used in the non- 
homes card for PASS1, the inputmedia card would have to 
be changed for PASS2. (See Figure 16.) 
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RNADD 

Figure 21 shows the parameter cards used to generate 
the RNADD additions program. The following cards 
are exactly the same as for PASS1. 

SYSTEMSPEC MASTCONTRL 

DISKDRIVES MASTBLOCK 

ADDRESSING MASTLIMITS 

Input File 

INPUTMEDIA — Input to the load programs was 
from disk storage. Card input is assumed for the addi- 
tions program. The format of this input is shown in 
Figure 22. Because the format is not that required for 
automatic entry of the input records, the operand 0 
indicates that a symbolic record-assembly routine is 
furnished with the source deck. 

INPMASTREC — The assembled input data records 
are 130 characters long. There are no terminal record 
marks on input, but they must be appended to the 
output records, because they were dining the initial 
loading of the file. 


User's Subroutines 

The assembly routine (Figure 23) extracts certain fields 
from the input cards and places these in the input 
record area. Two of these fields are also moved to the 
print area, along with other information that is present 
in the input but that is not included in the output 
master records. The assembly routine then branches 
back to the main program. 

After processing the records, the program branches 
to an EXIT2 routine (Figure 24). This routine checks 
to see whether the record was written in a home or 
non-home position. If written as a home record, the 
disk address produced by the conversion routine is 
the actual address used to write the record. This ad- 
dress is moved to the print area. If the record is writ- 
ten as a non-home, the routine moves both the 
converted disk address (CONV1) and the actual disk 
address (WORKN) to the print area. The audit trail 
is then printed. 

At end of job, the RNADD program prints a message 
giving the total number of records added. However, 
no separate count is given for home and non-home rec- 
ords. This distinction is automatically made by PASS1. 
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In order to get this count, the EXIT2 routine adds 1 
to a counter each time a record is processed as a non- 
home. In order to print this total, EXIT3 is called for. 
The input file is followed by a card with ENDCD in 
columns 1-5. This card is then followed by one with 
BXXX in columns 1-4, where XXX is the actual ma- 
chine address of the first instruction in the EXIT3 rou- 
tine. This address can be found by looking up the 
label EXIT3 in the assembly listing. The EXIT3 rou- 
tine prints the total and halts. 

TRADD 

The transactions, or trailer records, are loaded into disk 
storage from cards. The input cards and the resulting 
output trailer records are shown in Figure 18. The 
parameter cards used to generate the TRADD pro- 
gram that loads the trailer records are shown in Figure 
25. This TRADD program is used each time new trailer 
records are to be loaded. In a file such as the one dis- 
cussed in this example, the transactions would probably 
be entered in the file daily. Another version of the 
TRADD program is generated to reload trailers un- 
loaded by RNUNLD (see Reorganization Programs). 

The following parameter cards in Figure 25 are 

exactly the same as for PASS1. 

SYSTEMSPEC ADDRESSING MASTLIMITS 

DISKDRIVES MASTCONTRL LOADAUDIT 

TYPEINPUT MASTBLOCX 

Input Trailer File 

1NPUTMEDIA — Each input trailer record is con- 
tained in a single card. In the event of an error, the 


program is to print the control field of the record and 
bypass it. 

Note. Because these are single-card records, the only error in 
the input record format that could be detected would be a 
sequence number (columns 9-10) other than 01. 

TRA1LENGTH — The input trailer records are 70 
positions long and do not include terminal record 
marks. 

TRAILCNTRL — The major control field used in the 
trailers is also used in the master records. However, 
the two subfields comprising it have been rearranged 
in the record and now appear in the order in which 
they are extracted for the conversion routine. 

Master File 

INPMASTREC — The organized master records are 
145 positions long, including terminal record marks. 

Output Trailer File 

TRAILBLOCK — The output trailer file is written 
one sector at a time, with one 78-character transaction 
in each sector. The remaining 22 positions are padded 
with blanks. 

Delete Programs 
RNDEL1 

The parameter cards required to generate a RNDEL1 
program for the sample file are shown in Figure 26. The 
following cards are exactly the same as for TRADD: 
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Figure 26. Parameter Cards for Sample RNDEL1 Program 
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Figure 27. Input to RNDEL1 


SYSTEMSPEC MASTLIMITS TRAILCNTHL 

DISKDRIVES MASTBLOCK TRAILBLOCK 

INPMASTREC ADDRESSING LOADAUDIT 

MASTCONTRL 

The teiailength card gives the length of the trailer 
records as they appear in the organized file. The 
typedelete card specifies that records (master and 
trailers) are to be deleted (instead of tagged) and that 
each record deleted is to be printed. The loadaudit 
card is included and specifies that the control data and 
new disk address be printed for each record displaced 
by a deletion. 

Note. The loadaudit card would not be used if TAG were 
punched in the typedelete card. 

The input to RNDEL1 is shown in Figure 27. Each 
card can contain the control data of one, two, or three 
records. 

RNDEL2 

If RNDEL1 were generated to tag records, a RNDEL2 
program would be needed to delete all tagged records. 
The parameter cards would be exactly the same as 
shown for RNDEL1, except for the routine card. 
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TRDEL 

To generate a TRDEL program for the sample file, 
we would change the routine card shown in Figure 26, 
supply a min orcntkl card, leave out the loadaudit 
card, and use all of the other cards exactly as they 
appear in Figure 26. The trailer records shown in 
Figure 18 have a field containing the invoice number 
in positions 35-39. This could be used as the minor 
control field. The minorcntrl card would be punched 
with the operands 39, 5. 


Reorganization Programs 
RNUNLD 

The assumption was made in the description of the 
sample file that a billing program tags trailer records 
when they are processed and are no longer required. 
The parameter cards shown in Figure 28 are used to 
generate a RNUNLD program that is used to unload 
the active, or not- tagged, trailers. The following cards 
are exactly the same as for RNDEL1: 

SYSTEMSPEC TRAILCNTRL MASTBLOCK 

DISKDRIVES TRAILBLOCK MASTLIMITS 

TRAILENGTH MASTCONTRL ADDRESSING 

The inpmastrec card includes the operand RMOUT, 
which specifies in this case that the output trailer rec- 
ords are to have terminal record marks. 

The typernunld card calls for active trailers to be 
unloaded. 


The unldmedia card specifies tape output, with 20 
records per tape block. The output tape is to be writ- 
ten with standard 120-character tape labels. 

TRADD (Reorganized) 

The unloaded, active trailer records can be reloaded 
with a TRADD program generated with the parameter 
cards shown in Figure 29. The following cards are the 
same as for the initial-loading version of TRADD: 

ROUTINE MASTLIMITS ADDRESSING 

SYSTEMSPEC INPMASTREC TRAILBLOCK 

DISKDRIVES MASTBLOCK LOADAUDIT 

TRAILCNTRL MASTCONTRL 

The following cards are the same as for the 
RNUNLD program: 

TYPERNUNLD 

UNLDMEDIA 

The typeinput card specifies: 

1. tape input 

2. 20 records per tape block 

3. blanks padding out any unused record locations 

4. standard 120-character tape labels followed by tape 
marks 

5. that the tape header labels are to be checked on 
file identification field only. 

The trailength card gives the length of the input 
trailer records. These records were unloaded by 
RNUNLD with record marks at the end of the records 
and a blank position in front of each record. 
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Retrieval Routines 


The ibm disk-file organization routines do not include 
any retrieval routines. The Input/Output Control Sys- 
tem and the Report Program Generator can often be 
used to advantage on files organized by these routines. 
Both of these programming systems accommodate files 
organized by the random and the control-sequential 
routines. 

The block diagram shown in Figure 30 shows a 
method of retrieving records from a random file. 

Control-sequential files are normally processed se- 
quentially: a program simply reads the next consecu- 
tive disk location unless directed to an additions area 
by an address in the sequence-link field. 

When it is desired to retrieve certain records from a 
control-sequential file without passing the entire file, a 
method such as that shown in Figure 31 can be used. 
The block diagram in Figure 31 uses a search method 
that is especially efficient in a large file if the entries in 
the distribution index represent a large range of disk 
storage. For example, if an entry were made to the 
index once for each cylinder, this method is probably 
quicker than any other. However, if entries are made 
to the distribution index more often, it may be quicker 
to scan the records sequentially within the range until 
the desired record is found. Linkage need not be fol- 
lowed to the additions area unless the desired record 
is actually in that area. 
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Figure 30. Retrieval from a Random File 
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